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はじめ に 一 . 


; 本書はこれから BASIC プログラムを始めようとする方にも、既に BASIC 
を知っていて PB- 400をフルに活用しようとなさる方にも、わかりや 
1 すく、すぐに使えるように説明してあります。 

BASIC プログラムを初めて習う方は第1章から順にお読みになり、プ 
ログラムの基本をしっかりと覚えてください。特に第3章では、プロ 
グラムの作り方 やコマンドの 説明をよくお読みください。なお、第3 
i 章ではプログラムを流れにそって説明しておりますので、各 コマンド 
i の書式 や 詳しい説明については第4章の コマンド リフ ァレンス 編を 参 
I 照してください。 

| 既に BASIC を知っている方は、第1章、第2章で基本的な操作を覚え 
た後は、第4章のコマンドリファレンスを読みながら PB- 400をお使 
いください。 

! すぐにプログラムを入力して使いたい方は、第5章の「実用ライブラ 

リー」や、第3章の5により PB -丨〇〇 のプログラムを使うことができ 
ます。 

では、この本を参考にして PB- 400を有効に使ってください。 













イ吏用の前 u 


この計算機は、カシオの高度な電子技術と品質管理のもとで、厳重な検査工程 


を経て、皆様のお手もとに届けられています。 

本機を末ながくご愛用いただくために、次の点にご留意のうえ、お取り扱いく 
ださい。 


■ご 使用上の注意 

• 計算機は精密な電子部品で構成されていますので、絶対に分解しないでくだ 
さい。また、投げたり落したり等のショックや、急激な温度変化を与えない 
でください。特に、高温の所、湿気やホコリの多い所に放置したり保管する 
ことはしないでください。なお、温度が低いときは表示の応答速度が遅くな 
ったり、点灯しなくなることがありますが、通常の温度になると正常にもど 
ります。 

•アダブター差し込み口には、本機専用のオプション以外は接続しないでくだ 
さい。 

♦計算機の演算中は、'-"を表示し、この間のキー操作は一部キーを除いて無効 
ですから、常に表示を確認しながら、確実にキーを押してください。 

參ブザーを鳴らしたときに表示が薄くなることがありますが、故障ではありま 
せん。なお、あまり表示が薄いときは、早めに電池を交換してください。 

♦電池は、計算機を使わない場合でも2年に1度は交換してください。 

特に消耗ずみの電池を放置しておきますと、液もれをおこし、故障等の原因 
になりますので、計算機内には絶対に残しておかないでください。 

♦計算機のお手入れは、シンナ-^ンジン等の揮発性液体をさけ、「乾いた柔 

らかい布」あるいは、「中性洗剤液に浸し固くしぼった布」でおふきください。 

♦プログラム実行中または演算中には、電源スイッチを切らないでください。 


■保証 •アフターサービス 

•保証は、別紙の保証書の内容によりますので、よくお読みのうえ、記入事項 
を確認して、大切に保管してください。 

參万一故障したときは❶ お買い上げ店 ❷カシオ計算機サービスセンター 

のうち、ご都合のよい所へ、必ず保証書をそえて、ご持参またはご郵送くだ 
さい。この場合、故障内容を具体的にお知らせください。 

參修理依頼される前には、この説明書をもう一度お読みになると共に、電源の 
状態および、プログラムミス、操作ミスがないかをよくお調べください。 

• ご不明の点やご質問、お問い合わせ等は、142ページのカシオ計算機へ直接ご 
連絡ください。 
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CASIO 

PB-400 


^表示用コントラスト 

-計算命令キー 


'セ キュー ト キー 
J 、 数点キー 



電源スィッチ- 


i3SSQ[IJSUJ^aJS 

t-pKt — ~> ：i ? ふ s - 一 ' rrro — nor - vh - thk - . * 

S„SS Q S®ejP M@l 


アルフアベツトキーー 


普通の電卓に比べて、たくさんのキーや差し込み口があります。これだけキー 
がたくさんあると、どのキーを何に使うのかと迷われるかもしれません。この 
迷いを取り除くために、これから各々のキーや差し込み口などを説明します。 


馨電源スイッチ 

スライド式のスイッチで、右にスライドすると電源が入り、左にスライドさ 
せると電源が切れます。 

♦置数キー•小数点キー、計算命令キー、エクセキュートキー 

このキーの 配列をよく見てください。普通の電卓と同じ配 
列をしていますね。この部分はちょうど四則計算(加減乗除） 

をするときに使いますが、少し異なる点があります。 

それは D (カケル）と H (ワル）のキーがちがっていること 
と、日(イコール）キーがなく、■(エタセキュート）とい 
うキーがあります。これはコンピュータの言葉では x は 
氺（アスタリスク）を、+は/(スラッシュ）を使い、 B キ 
のかわりに sa キーで答えを求めます。 


D 

〇回固〇 
固国回〇 
□ D [2](3 ]D 
foirnrExn 


一1各部の名称とそのはたらき 


まず、 PB -400 を手に取って、よく見てください。 


アダプター差し込みロー1 



シフトキー 


BHBIJPI 

晷_,慝一 

自 ___ 

efflSLUJI 





















例えば、普通の電卓で 12 E 34 B 30705 B と操作するところを、 
PB -400 では、1204030705■と操作します。 

これで、 PB -400 を普通の電卓がわりに使うこともできます。 

なお 、 S キー （赤色の[ I ] キーをアルファベットキーの ® 

と区別するために本書では@と記します。）に続けて押し 
ますと、回〜回キーは P 0 〜 P 9 のプログラムエリア指 
定の役目をし、 E 1 キーはべき乗計算ズ t ジ）の、 

DOOD キーは大小比較記号（2、ん>、く）を表示しま 
す 0 


春アルフ アベツト キー、 スペース キー 

CS®[1][r][i][x)©DD®E 
S d] ® (Z) 回 CE] [J] ® @ 

この キーが PB -400 の 特長で、タイプライターのように アルファべ ット26文字 
と、スペースキー ( S ) が並んでいます。このキーを使って PB -400 に命令を与 
えたり、プログラムを書き込んだりします。また、 A 〜 Z までの26文字のキ 
一はそれぞれがメモリー（記憶するところ）の役をします。 

なお、 s 〜 a のキーには別の役割があり、@(赤い [ a のキーで、 アルファべ 
ットキーの [ D と区別するために本書ではこのように記します。）に続けて押す 
と記号や BASIC のコマンドを表示します。 

例） GOSUB 、 ? 


P7 P8 P9 > 
CZDCZDCZ ) 口 

P4 P5 P6 < 

C=D CZD C=) CUD 

PI P2 P3 > 
CZD C=Z) C=) CZD 

(=DC=^{JMJ 


/ n $ ( ) ? : ; • 

C=D C=Z) (=ZD CZZ) C=) C=D CZD (ZZD (ZZ) CZ 

GOSUB RETURN GOTO FOR TO NEXT IF THEN LIST 

C=) (=ZD (ZZD (=D (ZID CZ=) C=) CZZD CZID 

PRINT INPUT CLEAR DEFM LOAD SAVE RUN 

CZD CZD CZ3 C=) (Z=D CZD (ZZD 
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このアルファべットキーはあと2つの顔を持っています。それは拡張モード 
(@キーに続いて0キーを押す。 EXT 点灯)での使い方で、直接押すとアルフ 
ァべットの小文字を、@キーに続けて押すと特殊記号を表示します。 


拡張モードでの働き 


「 qj 丨 wjre 11 r | 丨 t "I 「 VJ 丨 u 1 fi || oIfP I 

SSSDDSECDEC □口 

□□口 


拡張モードで @ キーに続けて押したときの働き 

CZD C=D C=D C=) C=D (=3 C=D C=D C=D C=J 
% . @ V ( 

wona 

拡張モードを解除して、アルファベット大文字に戻すには、もう一度凾 □ と 
押します。 

このように、アルファベットキーは4 つの 顔を持っていますので、よく覚え 
ておいてください。 

•イ コール キー （ S ) 

このキーは計算の答を求めるためのキーではなく、代入文 (28 ページ参照)や 
IF 文 （49 ページ参照）での判断のために使います。 

なお、@キーに続いて押しますと、知（等しくない）の記号が表示されます。 

•指数部置数キー•パイキー (*) 

このキーは直接押すと指数部置数キーとなり、指数部 （10 の何乗）を置数する 
前に押します。例えば 1.23 X 10 4 の場合は11 E 回と押します。指数 
部が負の場合は、このキーに続いて〇キーを押します。 7.41 X 10- 9 は (7 E ] 
回 mEOdi と押します。 

@キーに続いて押しますとガ(パイ……円周率）を表示します。 


♦アンサーキー（@) 

この キーは直前に行なわれた計算の答を覚えているキーで、 マニュアル 計算 
とプログラム 計算で行なわれた計算の答を表示します。 



♦モードキー（@) 

このキーは計算機の状態や角度単位を指定するするときに、 □ 回〜回のキ 
一と組み合わせて使います。 

@0……卞 XT " を表示し、拡張モードとなり、 英小文字 • 特殊記号が使え 
ます。再び押すと拡張モードを解除します。 

@囵…… '' RUN " を表示し、マニュアル計算およびプログラム計算が行なえ 
ます。 

S 3 D …… 、、 WRT " を表示し、プログラムの書き込みおよびチヱック、編集が 
行なえます。 

_……、'丁 R " を表示し、実行トレースが行なえます。（詳しくは44ページ） 

SO …… 、' TR " が表示している場合は' ' TR 〃が消え、実行トレース機能が解 
除されます。 

凾 S 1 …… V ' DEG " を表示し、角度の単位を〈度〉に指定します。 

…… ” RAD " を表示し、角度の単位をくラジアン〉に指定します。 

@回…… '' GRA 〃を表示し、角度の単位を〈グラジアン〉に指定します。 

@0…… '' PRT " を表示し、プリンタ接続時はプリント出力をすることがで 
きます。 

_……卞 RT 〃が表示している場合は、、 PRT 〃が消え、プリント出力が解除 
されます。 

•カーソルキー（@0) 

このキーは表示されている文字を訂正するときに便利なキーで、 カーソル (表 
示窓で点滅している”-〃のことです）を左右に移動させます。1回押すと一 
文字分移動し、押し続けますと文字の書いてある範囲内を続けて移動します。 


♦オールクリアーキー（田） 

このキーは全てのキーの中で一番強いキーで、どんな表示でも消してしまい 
ます。また、エラーになって停止したときやオートパワーオフ （8 ページ参 
照〉で表示が消えているときにも押します。プログラム実行中は、プログラ 
ムを中断させます。 

♦インサート•デリートキー （ S ) 

このキーも表示されている文字を訂正するときに便利なキーで、カーソルが 
点滅している文字を削除(デリート）します。削除した後はカーソルより右側 
の文字を左につめます。 

また、@キーに続けて押しますと、 カーソルの 点滅して いる 文字以降を右に 
ずらし、空白をあけます。 
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♦ストツプ キー （@) 

このキーはプログラム実行中に使うキーで、プログラムの実行を一時的に停 
止させます。プログラムを続けて実行させたいときは E 3 キーを押すことによ 
り再開します。 

♦表示用コントラスト 

電池の消耗や表示窓を見る角度により、濃く見えたり薄く見えたりします。 
このようなときには、本体右側面にあるボリウムで、見やすい濃さに調整し 
てください。 



ボリウムは矢印方向に回すと濃くなり、逆に回すと薄くなります。 

なお、最も濃い位置にしてもまだ表示が薄い場合は、電池がかなり消耗して 
いることが考えられますので、なるべく早く電池を交換してください。 

籲アダプター差し込み口 

この差し込み口は別売のオプシヨンを接続するコネクターで、プリンタを使 
うときはく FP - 12> を、テープレコーダーで記録するときには < FA - 3 > をつな 
ぎます。 



この差し込み口にはく FP -12〉、 く FA - 3 > 以外は接続しないでください。 

また、オプションを接続しないときは、必ず付属の コネクターカバーを つけ 
て使用してください。 
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本機は、リチウム電池 (CR- 2032 >2個を電源とします。 

コントラストのボリウム （6 ページ参照）を最も濃くなる位置にしても表示が薄 
く見えるときは電池が消耗していますので、早目に下記に示すように電池交換 
をしてください。 

なお、計算機が正常に使用できても、2年に1度は必ず電池交換をしてください。 


■電池交換の仕方 


⑴電源スイッチを切ってから、裏面の2 
個のネジをはずし、裏ブタをはずします。 

(2) 図 の ®を押しながら矢印方向にスライ 
ドさせて、電池押さえ板をはずします。 

⑶古い電池を2個とも取り出します。 

(電池ボックスを下に向けて軽くた^| 

(たけば簡単にはずれます。 ) 

⑷新しい電池の表面を乾いた布でよくふ 
いてから ㊉ 側を上にして入れます。 

⑸電池押さえ板で電池を押さえながらス 
ライドさせてとじます。 




⑹裏ブタをネジ止めし、電源スイッチを ON にしてからリセットボタンを先の細 
い棒で押してください。 

※ブザーを多用しますと電池寿命は短かくなります。 

※電池は必ず2個とも交換してください。 

※消耗ずみの電池は絶対に火中に投入しないでください。破裂することがあり、 

非常に危険です。 

※電池の ㊉㊀ は絶対にまちがえないようにしてください。 

電池は、幼児の手のとどかないところに保管してください。 

万一、飲み込んだ場合にはただちに医師と相談してください。 































■オートパワーオフ（自動電源 OFF ) 

スイッチの切り忘れによるムダな電力消費を防ぐ自動節電機能で、操作完了 
後(プログラム計算中を除く）約7分で自動的に電源オフになります。 
この場合は、電源スイッチを入れ直すか、 B 3 キーを押せば、再び電源オンに 
なります。 

※電源オフになってもメモリー内容およびプログラム内容は消えませんが、角度指定や 
各モード指定 (、' WRTV ' TR "/ PRT " 等）はすべて解除されます。 
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一 3 計算の前に^/ 

■計算の優先順位 

計算には「優先順位」という規則があり、たし算•ひき算よりかけ算•わり算の 
方を先に計算することになっています。 PB -400 はこの優先順位を計算機自身が 
自動的に判別するようにできています。この機能はとても便利で、数式をその 
まま打ち込んでいけば正しい答が求められます。 

計算の優先順位は次のように定められています。 

① 関数 ( SIN , COS 等) 

② べき乗 （ t ) 

③ X (*)、+(/) 

④ +、一 

計算はこの優先順位に従って行なわれますが、優先順位が同じときは頭から(左 
から）、カッコが使用されたときはカッコの内が最優先されます。 


く例〉 2 + 3氺 SIN (17+13) t 2 = 2.75 














■入出力桁数と演算桁数 

本機の数値を入力できる範囲(入力桁数）は仮数部12桁、指数部2桁です。内部 
演算も同じで、仮数部12桁、指数部2桁で行なわれます。 

数値を表示できる範囲(出力桁数)は通常、仮数部1〇桁で、マニュアル計算によ 
る答の表示とプログラム中での答の表示は異なります。マニュアル計算では指 
数部や負符号がつぐ場合、仮数部、指数部、負符号を含めて12桁まで表示しま 
す。プログラム中では仮数部10桁、指数部2桁を全て表示しますが、合計が12 
桁をこえる場合、最初に頭から12桁分を表示し、以後順に表示が左に送られる 
ようにして表示されます。 


く例〉 

マニュアル計算 


102345678912 m 

L 234567891 

123456789120100 S3 

1 〇 2345678 e!2 

12345678912〇-100 回 

-L 234567 e12 


プログラム計算 

PRINT 123456789120-100 の場合 

e ! 1 
11 
1 


-h 234 567891 
- 1 B 25456799 1 e 
-1 „ 254567891 e! 

254567891 eO 


自動的に 

送られ 

ます。 


表示の外に 
消えまず。 


まだ表不されて 
いません。 
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ここでは、 PB -400 に慣れ親んでいただくために、とにかく 
さわってください。多少まちがった操作をしても壊れるも 
のではありません。習うより慣れろ のこと わざ通りに、ま 
ずは簡単な操作から。 
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/ 2-1 とにか〈さわってみよう > 

ここではまずさわって動かしてみて、どのように動くかを見てみましょう。 
まず最初にすることは、 PB -400 を手に取って、電源スイッチを右にスライドさ 
せて、電源を入れます。 


すると表示は次のようになるはずです。 


READY _P0 


初めにこの表示を消してみます。 ES キーを押してください 。 ''READY P 0" 
は消えましたね。このとき左端に点滅している''-"があります。これを「カー 
ソル」と呼び、ここから文字を書き始めます。 


このカーソルが点滅している状態を「入力待ち状態」とも言い、計算や命令を 
待っているのです。カーソルは通常''一"の点滅ですが、文字を続けて書いてい 
くうちに、''画' ' の点滅となることがあります。 PB -400 では1行に書ける文字数 
が62文字までですので、56文字以上書きますと注意信号として表われます。な 
お、表示窓の上に'' RUN " と'' DEG " が点灯していると思いますが、これは状態表 
示といい、今 PB -400 がどのような状態になっているかを示します。 '' RUN " は 
RUN (ラン）モードを示し、マニュアル計算やプログラムの実行が行なえます。 
、' DEG 〃は角度単位で、度になっていることを示します。角度単位はほかに、® 
固と押して指定するラジアンモード CRAD " 点灯)、@回と押して指定するグ 
ラジアンモード （、' GRA " 点灯)があります。この角度単位は三角関数などを使う 
ときに必要となります。電源スイッチ ON では'' DEG " が表示されます。 

状態表示はほかにも sm と押すプログラム書き込みモード rwRT " 点灯)、® 
E ) と押すトレースモード （、' TR 〃点灯、44ページ参照）、@0と押すプリントモ 
ード TPRT 〃点灯、81ページ参照)、@[3と押す拡張モード （ V EXT 〃点灯）を示 
すものがあります。 

このような状態表示はさわっているうちに覚えてきますので、ここでは見るだ 
けにしてもかまいません。 
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では、計算機にさわって表示をさせてみましょう。 

もしいろいろさわって、状態表示が色々と点灯している方は、一度電源スイッ 
チを切ってから再び電源を入れてください。 

まず初めに簡単な計算をしてみましょう。 


例）123+456=579 

S 3 を押します。 

数式の通りにキーを押します。 

[ DEEID 回固回 

この後に e のかわりに■で答を求めます。 

画 



どうでしたか、計算が簡単にできますね。 

では、次にもう少し長い計算をしてみましょう。 

例） 45 x 6+89=359 

ここでは45をまちがえて46と押してしま 
ったとします。 

回固〇回 D 回回 

45を46と押してしまったことに気がつき 
ました。でも、あわてずに、 カーソル キ 
一 ( e ) でカーソルをまちがった所に合わ 
せます。 

@@@@@@ 

ここで正しい固のキーを押します。 


固 

これで計算式が正しくなりましたので、 
答を求めます。 

23 


46-+b + 8y 


tee.+yy 


し力ーソルと6とが交互に 

点滅します 


4 挪 + S9 


359 


このように、途中でまちがいに気付いたときは、 カーソルキーを使って 簡単に 
訂正することができます。ただし、 ES キーを押してしまった後では、最初から 
入れなおしてください。 
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それでは、アルファべットキーを使って文字を書いてみましょう。 
アルファベットキーはタイプライターと同じ配列になっており、この配列を 
ASCII 型配列と いいます。 現在の パソコン はこの ASCII 型配列のキーボードが 
主流ですので、最初は慣れないでしょうが、だいたいの位置は覚えておいてく 
ださい。 

まず、計算機の名前を書いてみましょ,う。 

例）名前は 「CASIO PB - 400」とします。 

CASIO と書いてみます。 

EKnuco® 

次に PB-400 と書いてみます。 

E ® 日回回囵 
それでは、 CASIO と PB-400 の間を 1 文字分あけてみます。 

カーソルを P に合わせます。 _ 

eeeeee 「 crsiqpb-408^ 

1文字分あけます。 

I CflSIO 一 PEM00 

文字間をあけるときは、あけたい箇所の次にカーソルを合わせ、@溫で1文字 
分あきますので、何文字分もあけたいときは、繰り返し同じ操作をします。 

PB-400 には数字 •アルファべ ットのほかに、いくつかの特殊文字と呼ばれる文 
字があります。これはゲームや科学記号に便利な文字です。特殊文字の種類に 
ついては4 ページを参照してください。 

ここで少し表示させてみましょう。 

例）〇ウ〇品のマークを表示させる。 

まず拡張モードを指定します。 

この マークは a キーに 続けてアルフ ァベ 
ットキーを押します。 

例）2 の記号を表示させる。 

拡張モードになっているので、そのまま 
@キーに続けて押します。 



+ 带寺 fSii! 卜 1 . 一 


CHSIQ _ 

CHSIOPB-400^ 
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このようなマークや記号が用意されていますので、色々と利用して使ってみて 
ください。なお、拡張モードになっているときに、今迄のアルファベット大文 
字を表示するモードに戻す場合は、もう一度 E 3 □と押し、 V EXT " を消します。 

これでキーの柙し方はだいたいわかったかと思います。このように色々とさわ 
っているうちに 、' ERR 2〃 が表示されて、キーを押しても動かなくなることがあ 
ります。これは故障ではなく、 PB -400 にまちがった命令をしましたというメッ 
セージで、「エラーメッセージ」と呼ばれるものです。このときはあわてずに、 
B 3 キーを押せば表示が消えて、また動くようになります。このような エラー メ 
ッセージにはいくつかありますので、詳しくは39ページまたは136ページをご 
覧ください。 
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2-2 まず始めに基本計算/ 


ここでは簡単な四則計算ぐらいを行なってみますが、関数電卓を使ったことの 
ない方は注意していただきたいのです。それは、 PB-400 も完全数式通りという 
たし算、ひき算よりかけ算、わり算を先に計算する機能を持っているからです。 


例 1) 23+4.5 - 53=-25.5 
操作） 23D4.5B53iai 

※ここからは、数字キーはワクをはずして記します。 



例 2) 56X( -12 ) + (- 2.5 )=268.8 

操作） 56DB 12DB2.5Q | 268„ 8 

※負符号がつく場合は、数字の前に〇キーを押します。 


例 3) 7X8 — 4X5=36 

操作） 70804115 ■ 

※かけ算を先に計算してから、ひき算を計算します。 



例 4) ( 4.5X10 75 )X(-2.3X10- 7S ) = - 0.01035 
操作） 4.5® 75002 .30078® 卜0» 033 

※指数部は ® キーに続いて押します。 

もう一つの計算として、メモリーを使った代数計算があります。この計算は、 
ある一定の数値を色々と計算するときに便利です。 

例えば 31+5= . 

4 X + 6 = 

5^ + 7 = 

というような計算があり、ズの値が123.456であるとき、同じ数値を繰り返し押 
すのは面倒なものです。この計算を手間をかけずに行なう方法はないでしょう 
か。解決策は変数と呼ばれるメモリーを使うことです。この例では代数計算に 
戈という代数を使っていますので、変数Xを使って計算します。 
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まず、変数 X に123.456を入れます。 

(DB1 23.45 6E 

この0は等しいという意味ではなく、変数 X に123 • 456を入れるという意味です。 
では、計算をしてみましょう。 

3 OCKID 5 ■ 

4 OCEDD 6 ■ 

5 E3COQ 7 ■ 

こんなに簡単にできます。 

PB -400 にはこのような変数が A 〜 Z まで26個ありますので、色々な数値を覚え 
ておくことができます。 

この例では変数 X の数値は一定で、計算式が異なりますが、逆に計算式が一定 
で、変数の値が異なる場合はどうでしょう。 

もし、計算式が、'3ズ+ 5 ="と決っていて、 X の値が123、456、789と変化する場 
合、今のような方法では操作が面倒になります。実際には計算式を PB -400 が 
覚えてくれて、変数 X の値だけを変えればよいのです。この便利な計算方法を 
「プログラ厶計算」といいます。 PB -400 はこのプログラム計算が得意なのです。 
ここではプロダラムを使う前のマニュアル計算を行なっていますので、プログ 
ラムについては、第3章のプログラム編をご覧ください。 


175 〇 368 

499 n 824 

fc 24 n 28_ 
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^ 2-3 関数計算もおてのもの/ 

PB -400 は一般の四則計算のほかに、関数計算の機能も持っています。 

この関数機能はプログラム 中 に組み込んでも使えますが、ここでは マニュアル 
での使い方について説明します。 

PB -400 に組み込まれている関数は次の通りです。 


関数名 

三角関数 sin X 
cos X 
tan X 

逆三角関数 sin - 1 ^ 



cos - ’ 


tan -1 

平方根 


常用対数 

log x 

自然対数 

In x 

指数関数 

e x 

べき乗 

x y 


10進->60進 
60進—>10進 
整数化 
整数部除去 
絶対値化 I ズ I 

符号化 f 正数— 1' 

0 — 0 
，負数 

四捨五入 f ズの1〇女を 

. 四捨五入 

乱数 


書式 
SIN X 
COS X 
TAN X 
ASN X 
ACS X 
ATN X 
SQR X 
LOG X 
LN X 
EXP X 
x\y 

DMS $ ( 幻 * 
DEG(x 9 y 9Z ) 

INT X 
FRAC X 
ABS X 
SGN X 


RND( x,y)* 


) でく くります。 


※ DMS $、 DEG . RND は引数を必ず （ 

では、関数を使って計算をしてみましょう。 


RAN# 
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• 三角関数 (sin 、 cos 、 tan) 、 逆三角関数 (sirr 1 、 cos", tan -1 ) 

三角•逆三角関数を使うときは、必ず角度単位の指定 ( DEG 、 RAD 、 GRA ) 

'を行なってください。（角度単位を変更しない場合は、新たに行なう必要はあ 
りません。） 


く例 〉 sin 12.3456° =0.21 38079201 
〈操作〉画 S]—*DEG" 


SIN 12.3456 US [0 B 2138079201 


※ここからは、アルフ アベ ットキー、数字キーはワクを 
はずして記します。 


く例 〉 cos 63 〇 52,41"=0 • 4402830847 

〈操作〉 COS DEG@cd 63 @c=) 52 @c=d 41 SczdEI 

E 4492958847 

く例〉 2 • sin45°X cos65 •I 0 =0 • 5954345575 

く操作〉 2DSIN45OC0S 65.1133 [jj 0 5954 ス 45575 

く例 〉 sin 一 1 0.5=30° 

〈操作〉 ASN 0.5E3 [~JF\ 


〈例 〉 COS (+rad) =0.5 
〈操作〉画固 —RAD" 

COS@c=)@[f)D 3 

く例〉 COS - 1 -^-=0. 7853981 634「ad 
〈操作〉 ACS@cbSQR 2 □ 2 @c=dIS3 


0„5 


0 B 7855991654 


〈例〉 tan ( - 35gr a) = — 0.61 2800788 
く操作〉圏回 — * GRA" 

TANB35E3 卜 0 B 612800788 


•対数関数 （ log 、 In )、 指数関数 ( e 、 於） 

く例 〉 log 1.23(= log 10 1.23)=0. 0899051114 

〈操作〉 LOG 1.23133 | 0 B 0899051 114 
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く例〉 In 90( =log e 90)=4.49980967 

〈操作〉 LN90 四 「4:: 49980967 


く例〉 e 5 =148.4131591 
〈操作〉 EXP5® 

く例〉 10 K23 =16. 98243652 

(常用対数1.23の真数を求める） 
〈操作〉 10@a1.23SS 

く例〉 5. 6 2 - 3 = 52.58143837 
〈操作〉 5.60 占 2.30 

〈例〉123 } ( = /T23 ) = 1. 988647795 
〈操作> 12 3 @C=D@(=D 1 □ 7 HcZdSS 


143 a 4131591 



〈例〉 log sin40° + log cos35° = - 0.278567983 

その真数は……0 • 5265407845 (sin40°x cos35° の対数計算) 

〈操作〉国®-^ DEG" 

LOG SIN 40DLOG COS 35® 

10 @c=d@IS3 


_0" 279567995 

[ 5265407845 


•その他の関数 ( 厂、 SGN, RAN# 、 RND 、 ABS 、 INT 、 FRAC) 

く例〉 v^2+/5=3.65028154 

く操作〉 SQR 2DSQR 5 (S3 


〈例〉正数であれば、 '1〃 を、負数であれば、'一1〃を、 

〈操作〉 SGN 6B1 
SGN om 
SGND2IS3 

〈例〉乱数発生 （ 0 く RAN #<1の擬似乱数） 

〈操作〉 RAN@&ffl 0„ 7903739876 


3-65028154 



20 















〈例〉 12.3 X 4. 56の答を UT 2 の位で四捨五入する。 
12.3 X 4.56=56.088 

〈操作〉 RND@c=d 1 2.30 4.56®c=)B2@cb(S3 

※闪问口ぐズ，女）のときの！/は|1/|<1〇〇 [^ f ， n 1 


〈例〉 1—78.9+5.61 = 14.08928571 

〈操作〉 ABS@i 078.90 5.6@ iE 3 | 14 n 08928571 

〈例〉 f の整数部は……81 

〈操作〉 I NTScb 7800D 96 @c=d(B3 !：!1 _ 

※この関数は元の数値をこえない最大の整数を求めます。 

〈例〉 f の小数部は…… 0.25 

〈操作〉 FRAC@cd7800BI 96@c=dE 3 rpl a 2fl 


♦有効桁数指定、小数以下指定 

有効桁数と小数以下の指定は X ' SET 〃コマンドにより行ないます。 

有効桁数指定 …… SET E n (n =0-8) 

小数以下指定 …… SET F n (n =0~9) 

指定解除 . SET N 

※マニュアル計算での有効桁数指定の場合の 、 'SET E 0〃は8桁指定となります。 

※指定を行なうと、指定桁の下1桁目を四捨五入して表示します。 

なお、計算機内部やメモリー内にはもとの数値が残っています。 


く例〉 100+6=16.66666666. 

〈操作 〉 SET E 4 E 1 (有効桁数4桁指定） 

10006 ■ [1« 667 E 01 


〈例〉 123+7 = 17.57142857 …… 

〈操作〉 SET F2E1 (小数以下2桁指定） 

123D7B3 flTn 57 


〈例〉 1+3=0.3333333333. 

〈操作 〉 SET NE 3 (指定解除） 

1 D 3® | 0„ 3333333333 
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•10 進 ^60 進変換 (DEG、DMS$) 


〈例〉 

〈操作〉 


く例〉 
〈操作〉 


14°2536”=14.42666667 

DE G@cb 1 4 @c=d 25 @c=d 36 @c=dIS3 


12.345 6° = 12°2 (T 44.1 6” . 

DMSSczdScd 12.3456 @c=dE3 


14 n 42666667 


12" 20 ? 44„ 16 


く例 〉 sin 63。52,41*=0.897酬 12 
〈操作〉 H 回 

SIN DEG@c=)63 @c=d 52@c=)41 @c=dIS 

T 7897859012 


関数計算もこのように簡単にできます。 


22 






本章では、主に BASIC のブログラムとはどのようなこと 
か、どのように作るのかについて説明してあります。 

今迄、 プログラムに 慣れて いない 方は、 この 章を繰り返し 
お読みに なって、 基本を マスターして ください。 


23 





7 


3-1 プログラムとは？ 


「プログラム」 と聞くとよく難しいものだと感じる方がいますが、プログラム 
にも簡単なものから難しいものまであり、代数式を記憶させ、その代数式に数 
値を代入して計算させるのも立派なプログラムです。 

まずは難しい考え方は抜きにして、楽な気持ちで話を進めていきましょう。 

3-1-1 プログラムはこんなに便利 

私達の身のまわりには、色々な計算があります。仕事で使う会計や金融計算、 
測量や計測、その他にも家計簿や経費の計算などと考えられるだけでも多いも 
のです。この計算も1回だけで終るものならかまいませんが、何度も繰り返し 
同じ計算式で数値を変えて計算するのも大変な手間です。こんな計算は、 PB - 
400にとって最も得意な仕事です。たとえば、か= 2ズ 2 + 5ズ+13という数式があると 
します。この中で：*:の値が変化するときのがの値を求めるとすれば、ズの値を 
かえながら同じ計算をしなければなりません。この手間をはぶくために、この 
式を記憶させてみましょう。 

まずは見てください。 

10 INPUT X 
20 Y=2*Xt2+5*X+13 
30 PRINT Y 

これが数式を記憶させたプログラムです。 

細かい説明は後にするとして、2行目は計算式をそのまま書いています。これ 
でも立派なプログラムで、計算が便利になります。 

このようにプログラムとは、けっして難かしいものばかりではなく、身近な計 
算式をそのまま記憶させるだけでもかなり便利に使えます。 

それでは、プログラムについて順に説明していきましょう。 

3— 1-2 プログラムの仕組み 

まず、プログラムの仕組みを覚えてください。 

10 INPUT X 
20 Y=2*Xt2+5*X+13 
30 PRINT Y 
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これは前に出てきたプログラムです。このプログラムを分解して仕組みを見て 
みましよう。 





このプログラムは大きく分けると 3 つに分けられます。 


10 INPUT X . 入力部 

20 丫 =2氺 Xt 2+5 氺 X +13. 計算部 

30 PRINT Y . 出力部 


最初の入力部はデータ（計算に必要な数値など）を計算機に入れる（入力する）部 
分で、データの数により増えます。2つ目の計算部は計算をさせて答を求める 
部分で、一番の要となります。最後の出力部は計算機に答えてもらう（表示さ 
せる）部分で、計算をしただけでは何も答をおしえてくれませんので、答を表 
示させます。 

計算機はなんでもしてくれますが、正しい命令を与えてやらなければ何もして 
くれません。そのために、データを入れなさい（入力部）という命令と、答を表 
示しなさい（出力部）という命令を記憶させるのです。 

この3つの部分をさらに細かく分解すると、次のようになります。 

10 INPUT X 

1-1 T 

行番号 コマンド オペランド 

行番号とは、プログラムの流れにそってつける順番を示すもので、この行番号 
の小さい方から順に計算機が読んで、実行していきますから、実行させたい順 
につけてください。なお、この例のように、10、20、30……と10刻みに書いて 
いるのは、後で追加が必要となったときに便利にするためです。本当は1、2、 
3……と続けてもよいのですが、 1.5 とか、 12. 3のように小数点以下はつけられ 
ません。 

行番号の次に続くのがコマンドで、計算機にどのようなことをさせるかの命令 
を与えます。このコマンドは色々あり、命令により使い分けます。本当は全部 
のコマンドを覚えていただきたいのですが、一度に覚えるのは大変ですので、 
最低限必要なものを覚えていただいて、少しづつ数を増していってください。 
コマンドの種類や機能については、87ページからの「コマンドリファレンス」 

を参照してください。 

コマンドの 後のオペランドは、 コマンドの持つ命令を 補足するためにあり 、つ 
くものとつかないものが あります。 この 例では コマンドが '' INPUT "です ので、 
データを入力しなさいという意味があり、その入力したデータを入れるメモリ 
一を指定するのが オペランドで、 この場合変数 X に入れなさいという意味に な 
ります。 

次の行では、 

20 Y =2 氺 Xt 2+5 木 X +13 









行番号は前に続けて 20 としています。次の代入文は =( イコール）の右辺の値を 
左辺の変数に入れる（代入する）という意味です。この代入文も実際はコマンド 
として >LET 〃がつ き、 

20 LET 丫 =2* Xt 2+5* X +13 

とすれば、' LET " がコマンドで、代入文がオペランドということになります。 

行番号30は、行番号10と同じで、行番号、コマンド、オペランドでできています0 


30 PRINT 




行番号 コマンド 


Y 

オペてド 


プログラムとは、 だいたい このような仕組みでできており、これ等のコマンド 
やオペランドが多くなったり、行数が増えたりして大きなプログラムとなります。 


3-1-3 プログラムは簡単だ 

プログラムの仕組みさえ知ってしまえば、プログラムなんてたいしたものでは 


ないことがおわかりだと思います。 

プログラムを 作るには、入力部、計算部、出力部の三本の柱がわかれば充分に 
活用できます。全部のコマンドを一度に覚える必要はないのです。まずは簡単 
な、' INPUT "、、、 PRINT 〃、 それに計算の代入文を使って、身近な計算をやらせ 
てみるのです。 

プログラムを早く覚えるコッは、ただ漠然とプログラムを覚えようとせずに、 
身近な問題を探してプログラムにしてみるのです。会社で繰り返し行なう伝票 
計算や金種計算、測量や設計の計算、家での家計簿やオーディオの時間計算な 
ど、考えてみれば色々とあるはずです。この問題の中で計算式にしやすいもの 
を探して、プログラム化してみるのです。ただ漠然と覚えようとせずに、1つ 
の目的を持ってそのプログラムを作り、それに必要な コマン ドをまず覚えるの 
です。あとは、この作業を繰り返しながらプログラムをより便利なものへと改 
良していけばよいのです。 

もう一つの: i 、 シは、全体を一度に作ろうとはせずに、部分的に作り、あとで一 
つにするのです。どんなに大きくて複雑なプログラムも、部分的に分ければよ 
り分かりやすくなるはずです。 

これ等のことを考えながら、少しずつでいいですから、ゆっくりと行なってく 
ださい。基本さえ マスター すれば、後は コマンドリファレンス 編で各 コマンド 
の機能を読みながら使うだけで立派にプログラムが作れます。 

それでは、プログラムを作ってみましよう。 


26 




ここからが BASIC プログラミングの本題で、実際にプログラムを作り上げます。 


3 — 2—1 フローチヤー ト（流れ図）を作る 

フローチヤート という名前はあまりなじみのない名前かもしれません。これは 
作業の順番を図式化したもので、流れ図ともいいます。 

よく 「 BASIC にはフローチャートはいらない」という言葉を聞きますが、それ 
は頭の中でフローチャートが描ける人が言う言葉で、慣れないうちは全体の作 
業の段取りがわからないものです。そのために、簡単なフローチャートを描い 
て流れをつかむことが大切です。 

フローチャートを描くにも正式には専門の記号がありますが、そんな記号は覚 
えずに、1つの作業ごとに I I で囲んで線で継ぐだけでよいのです。 

では実際にプログラムを作りながら説明していきましょう。 

例として、ある数を入力して、その数の2乗を求めるプログラムを作ってみま 
しょう。まず、部分的に考えますと、計算部があります。そして、ある数を入 
力するのですから入力部があります。それに、答を表示させるわけですから出 
力部があります。この3つを1 1で囲むと次のようになります。 



この3つの要素を順に継げるわけで、最後にくるのは答の表示だということが 
すぐにわかると思います。次に、答を求めるために計算をしなければなりませ 
ん。計算をするためには、データを入力してやらねばなりません。 

これで3つの順番が分ってきたと思います。では、この3つを継げてみましょう。 


① 

② 

③ 



これでフローチャートはでき上りましたが、このフローチャートをさらにプロ 
グラムに近い形にしてみましょう。 















1 番目はデータを入力する命令です。これは INPUT 文を使い、変数にデータを 

入力させますので、変数を決めます。ここでは、仮に変数 A を使いますので、 
①の内容は、 " INPUT A " となります。2番目の計算は、入力された変数 A の 
内容を2乗し、答を別の変数に入れます。もう一つの変数を B としますと、 
、、 B=At 2" となります。この計算式は代入文と言い正式にば、' LET B = AT 2" 
と書きますが、 LET は省略できますので、' B = AT 2 〃だけでもかまいません。そ 
して、 3 番目では答を表示させます。 PRINT 文を使い、答の入っている変数丑の 
内容を表示させます ので、 "PRINT B " となります。 この 3 つの作業を もう 1 
度 フローチャー トにします。 



この後は、3つの作業に行番号をつければプログラムのでき上りです。 


10 INPUT A 
20 B = At 2 
30 PRINT B 


このように、フローチャートを作りながら順に組み立てていった方が、プログ 
ラムを早く、簡単に作ることができます。 

通常は、この2つのフローチャートの内の1つだけ作ればよいのですが、慣れ 
ないうちは1つ目のフローチャートを作るようにした方が便利です。 

実際のフローチャートには正式な記号があり、それぞれ意味があります。この 
記号にっぃてはあまり意識しなくてもかまいませんが、この例を正式な記号で 


描いてみましよう, 



•[ 入力を示します。 

•[ 処理を示します。 

•[ 出力を示します。 
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これ等の記号は巻末に記載してありますので、参照してください。 

















3-2 — 2 プログラムを作る 

これまでは、プログラムを作る前の段取りを話してきましたが、ここからは実 
際にプログラムを作ってみましょう。. 

まず簡単な例として、2つの数値を入れて、その2つの数値の和•差•積•商 
を求めてみましょう。 

ここでも重要なものは3本の柱である入力部、計算部、出力部で、この考え方 
に当てはめフローチャートを作ってみましょう。 



最初に2つの数値を入力するわけですから、 INPUT 文を使います。 INPUT 文 
はキーボードからデータを変数に入力する命令です。ここで1つ考えることは、 
データや答を入れておく変数です。プログラムを作っていく上で迷いがちなの 
が変数の使い方です。この変数は A から Z までのアルファベット1文字の名前 
を持つものと、 A (3) などのように添字とよばれる要素を伴う配列変数があり 


ます。これ等の変数の中から選び出すわけですが、慣れないうちに、出てくる 
順番に A 、 B 、 C 、 ……と選べばよいと思います。 

ここでは 2 つの数値を入れますので、 A と B を選び、、' INPUT A , B " としま 
す。この INPUT 文はカンマし ） で区切ることにより、1つでいくつもの変数を 
扱えます。 


それでは、次の計算部はどうでしょうか。ここでは4つの計算を行なうわけで 
すから、答も4つ出てきます。この4つの答を入れる変数をここでは C 、 D 、 

E 、 F とします。 

まず加算は、 A + B ですので、 C = A+B とします。 


減算は 、 A — B ですので、 
積算は 、 A * B ですので、 
除算は、 A / B ですので、 
これで、計算部はできました。 


D = A—B とします。 

E=A 氺 B とします。 

F = A/B とします。 

次は、この答を表示させます。 


表示させる命令は PRINT ですから、 "PRINT C , D , E , F " としましょう, 
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このプログラム化した型式を再びフローチャートにしてみますと、次のように 
なります。 


INPUT A，B 


C = A+B 

D = A-B 

E = A*B 

F = A/B 


/ PRINT \ 

^C.D-E.F ノ 
I 

これに行番号をつけてプログラムを完成させます。 

10 INPUT A,B 
20 C = A+B 
30 D = A-B 
40 E = A 氺 B 
50 F = A/B 

60 PRINT C , D ， E，F 

そして、最後にプログラムの終了を示す、' END " をつけます。 

70 END 

これがプログラムが完成しました。このように順をおって組み立てていくと、 
プログラムも簡単に作れます。最初から色々な命令を使ってむずかしく考える 
よりも、簡単でも使えるプログラムを作りましょう。 

ワン不イントレ ， ソス 

変数とは 

プログラムを 作る上で重要な要素として、変数があります。変数とは、入力 
したデータや計算の答を入れておく箱で、各々に名前がついています。この 
変数には標準の A から Z までの変数と、配列変数と呼ばれ A か Z の名前に区 
別をする添字のついた A (5)， B (50> という変数があります。 

/-I25 厂 789 厂 458 






















この変数にはさらに 2 種類あり、数値を入れる数値変数と文字列を入れる文 
字変数があります。今迄でできた変数は計算をするための数値を入れておく 
ので、数値変数でしたが、この他に A から Z の変数名に $( ドルマーク）をつ 
けた A$,B$,C$ と書いて使う文字変数があります。 PB -400 にはこの他に、 
専用文字変数 （$) という特別な文字変数があります。 

数値変数には10桁(仮数部10桁、指数部2桁）までの数値が入り、文字変数に 
は7文字までの文字列が入ります。また、専用文字変数には30文字までの文 
字が入ります。 


数値変数 

/" 数値を入れる入 


文字変数 

，文字を入れる、 



この2種類の変数は入れるものが異なりますので、数値変数に'' ABC " のよう 
な文字を入れることはできませんし、文字変数に数値を入れることもできま 
せん。 

これ等の変数は用途により使い分け、計算のための数値を入れるのであれば 
数値変数を使い、メッ セージ や記号を入れるのであれば文字変数を使います。 
配列変数は、多くの変数を使いデータを記憶していくときに便利で、1番目、 
2番目……というように順番で示される番号で変数を区別します。配列変数 
については、プログラム中で使いながら説明していきますので、ここでは変 
数の種類として覚えておいてください。 


く変数使用上の注意〉 

PB -400 では、数値変数と文字変数は変数名が同じであれば同じ箱を使ってい 
るのです。 

y 文字か数値のどちらかを入れる 



このため、1つのプログラム内で A という数値変数と A $ という文字変数を 
同時に使えません。 
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また、配列変数を使うときも同じ箱を色々な名前で呼ぶことがありますので、 
重ねて使わないように注意してください。 


A (13) ， 
A $(13) -4 



H (6) 

N (0) 


すべて同じ箱の名前です。 


A = A (0)= A $= A $(0) 

B = A ( 1 )= B (0)= B $= A $( 1 )= B $(0) 

C = A (2)= B (1)= C (0)= C $= A $(2)= B $(1)= C $(0) 


N = A ( 13)= B ( 12)=…… = N (0)= N $= A $( 13)=…… N $(0) 
Z = A (25)= B (24)= C (23)= …… = Z $= A $(25)= …… Z $(0) 

DEFM 文により増設したメモリーについても同じことがいえます。 

3-2-3 プログラムの入力 

ここでは、組み立てたプログラムを実際に PB-400 に憶えさせて（入力して）み 
ましょう。 

PB-400 に入力するプログラムは、前に出てきた2つの数値を入力して四則計算 
をさせるプログラムを使います。 

プログラム 

10 INPUT A,B 
20 C = A+B 
30 D = A-B 
40 E=A 氺 B 
50 F = A/B 

60 PRINT C , D , E,F 
70 END 

この プログラムを PB-400 に記憶させるわけですが、まず記憶させる準備をし 
ます。 

電源スイッチをオンにした状態は RUN モードと いい、マニュアル計算やプログ 
ラムの実行を行なうモードですので、このモードを WRT モード （プログラム記 
憶モード）に切り換えます。プログラムを記憶させることを別のいい方で「書き 
込む」ともいいますので、 WRT モードは 「書き込みモード」 ともいいます。 
では、 WRT モードに切り換えるために、 _H] と押してください。 









WRT モードサイン 


残りステップ数 


wrt deg Jb IB 

P 0123456789 



プログラムエリア 


PB -400 にプログラムを記憶させていない状態では上のような表示になります。 
上の4桁の数字は残りステップ数で、最大3616ステップを示しています。この 
数字はプログラムを記憶させたり、メモリーを増設したり （64 ページ参照）する 
ことにより減ってきます。下の0から9はプログラムエリアの使用状態で、点 
滅している数字が現在指定されているプログラムエリアです。このままプログ 
ラムを記憶させると、 P 0 のプログラムエリアに記憶されます。プログラムエ 
リアは P 0 から P 9 までの10個のエリアに分かれています。 

もし、何かのプログラムが記憶されている場合は、下の数字が表示せ ずに、、、-〃 
という カーソルが 表示されます。ここでは全部のプログラムを消して、 P 0 の 
プログラム エリアに 記憶させますので、 

NEW ALL m 

と操作してください。この操作は全プログラムを消す命令で、 P 0 にプログラ 
ムを記憶させる準備にもなります。 

それでは、キーを操作してプログラムを記憶させます。 

記憶は次の手順で行ないます。 

id 回 aisasad ) ■ —行ごとの最後に必ず押してください。 

I —アルファべツトキーを丨つづつ押して cnacEiin ] としても同じです。 

[ S 回回巨] SD ® ■ 

SKUCaSHOE) (31 
回 tHESSOCS E3 
EKUBSED® ■ 

固回 H S T 回 @cb(l]cyi]@a[E S3 
〇画 ] cm®® (si 

以上のキー操作でこのプログラムが記憶されました。 

なお、〇キーを押した後に行番号や次のコマンド、代入文との間に1文字分空 
白が開きますが、これは表示上見やすくしてくれるだけで、プログラム実行上 
は関係ありません。 

プログラムの記憶が正しくできましたか？ 

もし、うまくできなくてもあわてずに、ゆっくりと確実にキーを押してください。 
まちがえても、次のように操作すれば簡単に訂正できます。 








籲■キーを押すまえにまちがいに気付いた 

このときは、 S 3 キーを押さずに、回回キーを使ってまちがえた箇所にカーソ 
ルを合わせ、訂正をします。 

例〇 INPUT 」 '' A " と押すところと、 ' s " と押してしまった。 


回キーを1回押して' 、 s " にカーソルを合 
わせる。 


回 

10 

INPUT S 

正しいキーを押します。 


10 

INPUT F し 

続けて正しい操作をして■キーを押す。 

@C=)(1]■ 

10 

INPUT fl ? E ： 


例 2 ) RIN 丁 C ? ? E .•« F _行番号6〇の'' D " を抜かしてしまった。 


0キーを 4 回押して、掃入したい箇所の 
次に合わせます。 

回回 EI 回 

1 文字分開けます。 

@S 

%〃を入れます。 

囡 

訂正が終れば US キーを押します。 

团 


68 PRINT C ? 2 
66 PRINT して 
9 PRINT C ： ? P7 
60 PRINT C 7 d 


例 3) \ 4Q EE = Fl:+:E し 、' E " を l 文字多く入れてしまった。 

回キーを 5 回押して、 'E" に合わせます。 


® 回 so 回 

1文字分削除しますので、0キーを1回 
押します。 

削除が終りましたら、 E 3 キーを押します。 
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♦ S 3 キーを押してからまちがいに気付いた。 

■キーを押した後ではプログラムとして記憶されてしまいますので、 '' LIST " 


コマンドを使って再び呼び出し、正しく訂正します。 

例）行番号50を V 50 F = A / N 〃とまちがえてしまった。 
LIST コマンドで行番号50を呼び出す。 


Ba 50 圔 

eumi ] と押しても同じです 

回キーを1回押して、 '' N " に合わせます。 

回 

正しいキーを押します。 

E 

訂正が終りましたら、必ず®キーを押します。 

画 

もし行番号60以降が記憶されていれば行 
番号60が表示されます。 



このほかに訂正がなければ0キーを押して表示をクリアーします。 

田 


■キーを押しても、このように LIST コマンドで呼び出して訂正ができます。 
なお、新たに行番号をつけて書き直すこともできます。すでにある行番号をつ 
けて記憶させた場合は、後から記憶させた方が優先され、前に記憶させた行は 
消えます。 

このようにしてプログラムを記憶させますが、記憶の操作が終了したら、 B 回 
と押して RUN モードにします。 WRT モードのままでは記憶させたプログラム 
を消したり、書きかえてしまったりすることがありますので、記憶の操作終了 
後は必ず RUN モードにしてください。 


ワンホ 1〆 トレッスン 
プログラムエリア 

PB -400 にはプログラム分割機能として、10組のプログラムエリアがあります。 
このプログラムエリアは P 0、 P 1 、 P 2 …… P 9 とあり、使い方は同じです。 
プログラムエリアの指定は@キーに続いて回から回のキーを押すことにより行 
なえます。プログラム指定は RUN モードと WRT モードの両方でも行なえます 
が、 RUN モードで指定した場合はそのプログラムエリアに記憶されているプロ 
グラムが自動的にスタートします。 WRT モードで指定した場合はプログラムは 
スタートせずに、プログラムエリアの指定のみ切り換わります。 
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プログラムエリアの区別は、はっきりとしてください。プログラムを記憶させ 
るときやカセットテープに記録したり、カセットテープから呼び戻したりする 
ときに、別のプログラムエリアで操作しますと正しく行なえません。 

電源スイッチをオンにしたときや、 ES キーによるオートパワーオフ解除では P0 
のエリアが指定されています。 

確認の仕方は_回と押して、 、'READY" の後に出ている数字により確認できます。 

例 ） READY P 3. プログラムエリア P 3 


3-2-4 プログラムの実行 

では、前に記憶させたプログラムを使って、実際に計算させてみましよう。 
B 回と押して RUN モード （、'RUN" 点灯)であることを確認してください。 
プログラムを実行させるには2つの方法があります。 


①プログラムエリア指定による実行 

@キーに続いて回〜回の数字キーを押しますと、プログラムエリアの指定となり、 
プログラムが記憶されていれば、プログラムをスタートさせます。 


例） SS 

② RUN コマンドによる実行 
プログラム実行開始コマンド'' RUN" により実行開始 
例） (SMHE としても同じ） 

この2つの実行方法の違いは、①の方法では必ずプログラムエリアの先頭から 
実行を開始し、②の方法では先頭からも、任意の行番号からの実行もできるこ 


とです。 

まず、①の方法で実行します。 

操 作 

ここで2つのデータを入力します。 

例） 45 S 3 
36 m 

2つのデータを入力すると、和が表示さ 
れます。次の答を表示させるには■キー 
を押します。 

戀 

团 

趣 


表 示 
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今度は RUN コマンドにより実行してみましょう。 

ただし、 RUNES と操作すると①の方法と同じ結果になりますので、20行目から 
実行してみましょう。 

操 作 

SS20E3 | Q 1 

(RUN 20■でも同じです） 

■ 

团 
四 

このように、 RUN コマンドでの実行は、行番号を指定しなければ先頭から実行 
を開始し、行番号を指定すれば、指定行番号から実行を開始します。 

実際にはこの2つの実行方法にはもう一つの違いがあります。 

次の操作をしてみてください。 

操 作 

P5 のエリアにプログラムが記憶されて 
いなければ、何も表示されません。 

ここで RUN コマンドにより実行させてみ 
ます。 

(RUN ■でも同じです） 


1620 

1725 


RUN コマンドの実行では、現在設定されているプログラムエリア（この例では 
P5) のブログラムを実行させます。もしこの P5 に設定されているときに、 P0 
のプログラムを実行したい場合はどうすればよいでしょうか。 

それは、@逆)と操作して、プログラムエリアを指定するのです。 

@c=) I ? 

このように、2 つの 実行方法には違いがあります ので、 用途に合わせて使い分 
けてください。 

プログラムを 作り上げ、 PB -400 に記憶させた後、すぐにでも実行させて みたい 
ものです。もし、実行させて エラー （ERR 表示）になっても、がっかりしないで 
ください。こんなときには、次の項目を読んでまちがい探し（デバッグと言う） 
を行なってください。 
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ステップ数のかぞえ方 

PB -400 の持っているプログラム容量は、全部で3616ステップです。 

このステップとはプログラムを記憶できる許容量を示す単位で、プログラムを 
記憶させていく、残りステップ数が減っていきます。 

現在の残りステップ数は、 _ m と押して WRT モードにすると表示されます。 


例） 


EHIH 


3 S IS - 


012345 6 ' 


-残りステップ数 


また、使用するステップ数は次のようにかぞえます。 


•行番号 . 1 〜9999のいくつであっても2ステップ 

籲コマンド . 1ステップ 

♦関数 . 1ステップ 

• 文字 . 1文字で1ステップ 


•以上の他に、区切りとして■キーを押して記憶させるのに1ステップ必要と 
します。 


例) 


1 input a m . 5ステップ 


2 1 11 

10 B=SIN A E 3.7 ステップ 


I_I I_" “ 」 L_l 

2 111 1 1 


100 PRINT 

i » i 

2 1 


、、 B = " ; B ■ 

I_I L-ll_I 

4 111 


io ステップ 


計 22 ステッフ 


• メモリーを増設した場合は、1つにつき8ステップ必要とします。 
例）標準状態……26メモリー、3616ステップ 

DEFM 10 m ……36メモリー、3536ステップ 





















3-2-5 デバッグ（まちがいを直す） 

プログラムを作り上げ、いざ実行開始というときに、実行させても エラーが 表 
示されたり、結果が思うように得られない。このような事はよくあることです 
ので、がっかりせずに、原因を追求してください。 

プログラム中にある「まちがい」のこと を 「バグ」（虫の 意味） と 呼び、 この虫 
を取り除く という 意味で「デバッグ」 といい ます。 

この デバッグの 方法も原因により異なります。実行中にエラー表示になる場合 
と、エラーにはならないが結果が思うように得られない場合です。 

実行中に エラーが 表示される場合は、 PB -400 がエラーの 発生した箇所と エラ 
一の 内容を知らせてくれます ので、 原因追求は比較的簡単にできます が、エラ 
一は表示しないが結果が思うように得られない場合は、けっこう厄介なもので 
す。 

では、順を追ってデバッグをしてみましょう。 

(1) エラー表示によるデバッグ 

エラー表示とは、エラーメッセージとも呼ばれ、 


ERR2 PI 

3-50 






エラー発生行番号 

エラー発生プログラムエリア 

エラー 内容 


このように、3つの要素をおしえてくれます。 

エラー 内容は、 、' ERR " に続く コードナンバー により、どのような エラーが 起き 
•たかを知らせてくれます。 このコードナンバーは 1から9の数字で、 、、 ERR 1" 
は「メモリー オーバー」 とか、 、、 ERR 2" は「構文 エラー」 というような内容が 
決っています。 このコードナンバーの 内容については、巻末136 ページの「エラ 
ーメッセージー覧表」を参照してください。 

エラー発生プログラムエリアは、エラーの発生したプログラムエリアを知らせ 
てくれます。 

エラー 発生行番号は、 エラーの 発生した行番号を知らせてく れ ます。 

この 3 つの 要素により「どこで」、「どのような」 エラーか’ 起きた のかを 知る こ 
とができます。 

それでは例を上げ説明していきましょう。 

よく起きる エラーに'' ERR 2" があります。これは「構文エラー」 といい、プロ 
グラムを記憶させるときに、まちがって記憶させてしまうと起きるのです。 
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前の例題で使ったプログラムをまちがえて記憶させてみます。 

操 作 

MPT1 

20 四 
回@@ 

圈 

03直！ 

ここでは、行番号 20 の、、 C = A + B" を、' C = AB" とまちがえました。 
では実行させましよう。 

操 作 

SS 

45 B 

12133 


9 


ERR2 P0-28 


表 示 


P 123456789 

20 C 

= fl + B 

20 C 

= flB 

38 1 ： 

=fl - B 

REflC 

Y P0 


ここでエラーメッセージが表示されます。これは、プログラムエリア P 0 の行 
番号20で、構文エラーが発生しましたという意味です。 

では、行番号20を調べてみましょう。 

操 作 

ES …… エラー 解除 

jpn 

@S 20123 

ここで正しいプログラムと合っているかをチヱックします。 

A と B の間の、 ' + 〃が抜けていますので、正しく直します。 


表 示 

P ^125456799 

20 C=flE し 


操 作 

回 

QQf0] 


表 示 


.20 C 

=RB 

20 C 

= fLE! 

30 C 

= H-B 

REflC 

Y P0 


このように、 、、 ERR 2" はプログラムの入カミスが多いので、 、' ERR 2〃 が表示さ 
れたときはエラーの発生した行番号のプログラムをよくチヱックしてください。 
なお、記憶のまちがいだけでなく、 READ 文 （67 ページ参照）でデータを読み込 
むときに、数値変数に文字データを読み込もうとすると、、 ERR 2" が表示されま 
す。 、、 ERR 2" の発生した場所に READ 文があるときは、 DATA 文中のデータも 
チェックしてください。 

でけエラー の種類別にチェックポイントを上けてみましよう。 
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• ERR 1 :メモリー不足。スタックオーバー。 

残りステップ数を確認して、 DEFM 文でステップ数以上をメモリー 

に変換しようとしたかチヱックする。 

• ERR 2 :構文エラー 

記憶させたプログラムにまちがいがないかチヱックする。 

• ERR 3 :数学的エラー 

数式の演算結果が 10 1 GG 以上であったり、関数の入力範囲をこえてい 
ないかをチェックする。特に変数を使っている場合は、前後関係か 
ら変数の内容をチェックする。 （0 による除算や、負数の平方根をと 
っている場合が多い。） 

• ERR 4 :未定義行番号エラー 

GOTO 文や GOSUB 文、 RESTORE 文による4亍番号の: f 旨定か、正しく 
ないので、行番号を確認する。 

• ERR 5 :引数エラー 

引数やパラメータを必要とするコマンドや関数において、引数やパ 
ラメータの値をチヱックする。特に変数を使っている場合は、前後 
関係から変数の内容をチェックする。 

• ERR 6 :変数エラー 

配列変数を使うときに、 DEFM 文でメモリーの増設を行なっている 
かチェックする。また、同じメモリーを文字変数と数値変数の両方 
に、同時に使っていないかをチヱックする。 

• ERR 7 :ネステイングエラー 

エラーの起きた行が RETURN 文や NEXT 文であれば、正しく GO - 
SUB 文や FOR 文に対応しているかチェックする。また、 エラーの 
起きた行が GOSUB 文や FOR 文であれば、ネスティングのくり返し 
をチェックして、 GOSUB 文は8回まで、 FOR 文は4回までとする。 

• ERR 8 :パスワードエラー 

パスワードが設定されているときに、別のパスワードを入力しよう 
としたり、使えない LIST コマンドや、 NEW、NEW ALL 等の操 
作をしたかチヱックする。 

• ERR 9 : オフ。シヨン エラー 

カセット インタフヱイス CFA -3〉 やミニプリンタ 〈 FP -12〉 が正しく 
接続されているかチヱックする。く FA -12〉 に充電されているか、ま 
たは紙^►'•まりをしていないかチェックする。 < FA -3> に接続している 
テープ レコーダーの 音量調整や トーンの 調整を変えて再び行なった 
り、テープ レコーダーの ヘッドを掃除したり、テープを新しいもの 
と変えてみる。録音のときは白プラグのみを、再生のときは黒プラ 
グのみを差し込んで試してみる。 


以上が、エラーに対するチェックポイントです。ここで出てきた コマンド につ 
いては、後で順を追って説明していきますが、詳しい説明については87ページ 
からの「コマンドリファレンス」 編を参照してく ださい。 


(2) エラーは 表示されないが、結果が思うように得られない。 

このようなデバックは、プログラム中の計算式や変数の与え方がまちがってい 
る場合が多いので、計算式や変数の動きをチェックする必要があります。 

特に計算結果が思うように得られない場合は、元となる公式や計算式と比べて 
チェックしてください。 

プログラムを実行したら止まらなくなったときや、作業をせずに終ってしまう 
ときには、プログラムの流れを制御する変数の動きをチェックしてください。 
計算式のチェックは、前例 (1) のように WRT モード（画 m と押す）で、計算式の 
書き込んである行をチヱックします。 

プログラムの 流れをチヱックする場合は、制御する変数にデータを入れた後に 
STOP 文で停止させたり、 PRINT 文により変数の値を表示させてチェックし 


ます。 

次のプログラムを記憶させてください。 

10 INPUT A 
20 B=1 

30 FOR C=1 TO A 
40 B=B*C 
50 C=C+1 
60 NEXT C 
70 PRINT B 
80 END 

このプログラムは INPUT 文により 入力 したデータの 階乗を求める プログラム 
で、本当は行番号50は不要で、このように FOR ループ用の変数を変化させては 
いけないのです。 

なお、行番号 30 と 60 の FOR • NEXT 文はくり返し計算を行なわせるためのルー 
プ命令です。この FOR • NEXT 文については後で説明しますので、ここではと 
りあえず、記憶させてください。 

操 作 

誦 m 

@c=i 

NEWEJ 

しプログラムを消す命令です。 

10 @B T A S3 
20 B=1 


表 示 


P 」<1234567 

39 

3456 ! 

39 

P ill 234567 

39 


10 INPUTj 

20 B =1 
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30 @ 鹄 c=i esAEi 

40 B=B 木 CE3 

50 c=c+i m 

60 BczJCEB 

70 @s t b m 

80 ENDE3 

これでプログラムの記憶は完了しましたので、您画囵と押して RUN モードに 
します。 

では実行してみましょう。 

操 作 

@CD 

例） ^ 2 m 

本当の答は、479001600です。 

ここで計算式をチヱックしますが、計算式は合っています。次に FOR.NEXT 
ループの流れを見てみます。 

行番号50の次に STOP 文を入れて、プログラムを1回ごとに停止させてみます。 

操 作 

55 STOP S3 


表 示 

P ^i<23456789 

55 fTOP— 

READY 7T 


表 示 


? 


10395 


38 

FOR ㈡ T 

40 

B 小 C 

50 

c=oi 

60 

NEXT C 

70 

PRINT E ： 

80 

END 


この STOP 文は行番号 5 0次に入れますので、50と60の間を選んで行番号をつ 
けます。ここでは行番号55としました。 

では実行してみましょう。 


操 作 
12回 


ここでループの制御変数 C の値を見ます。 

C ES 

実行を続けます。 

趣 

再び変数 C の値を見ます。 

cm 


表 示 



この変数 C の値は1から1つづつ増えていかなければいけないのに、2つづつ 
増えています。これで 、 FOR . NEXT ループの動き（流れ）が正しくないこと 
がわかります。 
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プログラムをもう一度見なおして、変数 C の流れを見ます。ここでは行番号50 
に問題があり、必要ないことがわかりますので、行番号50と後から追加した行番 
号55の STOP 文を削除します。 


操 作 

pm 

50EB3 

55HS 

QQQ(0] 



これでデバッグは完了です。 

この STOP 文によるデバッグの他に、トレースモード （_( D と押す。、' TR " 点 
灯）によるデバッグがあります。 

トレースモー ドでのデバッグは、プログラムを1命令ごとに実行して停止しま 
す。この停止している間に変数の値を見たりできますので、■キーで1命令ご 
とに進めてデバッグをします。 

前例でためしてください。■キーを押すごとにプログラムエリアと行番号を表 
示します。 

なお、トレースモードを解除するには、 _ S 1 と押し、 S 、 TR " を消します。 


以上のようにしてデバッグを行ないますので、エラーが表示されたり、思うよ 
うに結果が得られなくてもがっかりせずに、確実にデバッグを行なつてください。 
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/ 3-3 発展するプログラム 

今迄の説明でプログラムについて、だいたいわかってきたと思います。 
プログラムの基本として、入力、計算、出力の 3 つのポイントがあります。こ 
の 3 つを使うだけでも色々なプログラムが作れますが、ここで説明する コマン 
ドは、憶えておくとプログラムがもっと便利になったり、使いやすくなったり 
します。ここでは、使って便利な コマンド について説明していきます ので、 順 
に少しづつ憶えていってください。 

3-3-1 プログラムの流れを変えるく GOTO 文〉 

プログラムの 3 つの基本に加え、同じ計算を何回も繰り返したり、プログラム 
の流れを行番号の順ではなく、任意の行番号へ移すときに便利な GOTO 文があ 
ります。 

まず例題として、ある数値の2乗を求めるプログラムを作ってみましょう。 
この プログラムは 「データの入力」、「2 乗の 計算」、「答の表示」の3 つででき 
ますので、フローチャートを作ってみましょう。 



このフローチャートにそってプログラムにします。 

10 INPUT A 
20 B=A 氺 A 
30 PRINT B 
40 END 

プログラムの記憶方法は、もうわかったと思いますので、ここからは省略しま 
す。もしわからなくなったときは、 32ページの 「プログラムの入力」編奋ご覧 
ください。 
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ここでは例として、15と43の2乗を求めてみましよう。 


表 示 


操作 

RUNIS1 


表 示 


操 作 
RU_ 

RUN® 

45 ( S 3 

このように、1回ごとに実行 （ RUNEi ) させないとできません。データがいくつ 
もあるような場合には、とても不便です。 

この計算が何回も繰り返しできれば便利だと思いませんか？ 

この繰り返しを便利にする命令が GOTO 文です。 

GOTO 文の働きは、 GOTO の後に示される数値に該当する行番号やプログラム 
エリアに、プログラムの流れを移します。 

ここで 使って いる プログラムに GOT ◦文を加えてみましょう。それは、行番号 
40の END 文を GOTO 文にします。 

40 GOTO 10 

この意味は、以後の流れを行番号1〇に移します。（ジァンプします） 

さっそく、記憶させたプログラムを変更して実行してみましよう。 


1849 


このように、 GOTO 文は繰り返し計算に便利な命令です。 

GOTO 文はプログラムの先頭に戻して、繰り返し実行させるだけでなく、任意 
の位置にジャンプすることができますので、他にも便利に使えます。 

たとえば、次のプログラムを見てください。 

10 INPUT A 
20 GOTO 50 
30 PRINT B 
40 GOTO10 
50 B=A 氺 A 
60 GOTO 30 

このプログラムはとてもおかしなプログラムですので、実行させなくてもかま 
ぃませんが、使い方は前のプログラムと同じです。 


1849 


mra 

5 ! 3 
1 s 4 










この プロダラ ムの 流れは次のようになっています。 

10 INPUT A < ~ 

1 

20 GOTO 50— 
p -^30 PRINT B 

1 

40 GOTO 10 - 

50 B=A 氺 A <—1 

i 

l 60 GOTO 30 

このように、 GOTO 文は指定された行番号に無条件にジャンプしますので、別 
名” 無条件ジャンプ〃 とも呼ばれています。 

GOTO 文では、行番号へのジャンプの他に、プログラムエリアへのジャンプも 
できます。 GOTO の後に、、#"を付けて〇〜9の1文字でプログラムエリアを指 
定します。 

例） GOTO #1…… プログラムエリア P 1 にジャンプする。 

GOTO #9…… プログラムエリア P 9 にジャンプする。 

プログラムエリアへのジャンプでは、そのエリア内のプログラムの先頭から実 
行を続けます。 

m/m ワンホイントレッスン 

PRINT 文 

PRINT 文は、後に続く変数の内容や文字列、数値を表示する命令です。 

変数は数値変数でも文字変数でもよく、変数の内容を表示します。 

例） A =123 のとき …… PRINT A —123 

B $=、、 ABC " のとき …… PRINT B$-^ABC 

文字列を、、"で囲んで書けばそのまま表示されますので、メッセージとして使う 
こともできます。 

例） PRINT 、' CASIO " CASIO 

表示させたいものが 2 つ以上ある場合は、，または；で区切ることにより、続 
けて書けます。 

例 ） PRINT A , B , Z $ 

PRINT 、' TOTAL=";T 

区切りの，と；の違いは、，では1つ目の内容を表示後'' STOP " を点灯して止 
まり、团キーを押すことにより次の内容を表示します。区切りが；のときは1 
つ目を表示後、続けて一行の中に表示します。 
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例）次のプログラムで試してください 


10 A =123 
20 B $=、' ABC " 

30 PRINT A , B $. A の内容を表示後、四キーを押すことにより 

B $ の内容を表示。 

40 PRINT A ； B $. A と B $ の内容を続けて表示。 

50 PRINT B $； . B $ の内容を表示後、停止せずに次に進む。 

60 PRINT A . A の内容を表示後、停止する。 

70 END 


このプログラムを実行しますと、次のようになります。 


操 作 

表 示 


RUN (S3 

123 

j PRINT A ， B$ 

四 

HBC 

四 

123ABC 

...PRINT A;B$ 
/ PRINT B$; 
…1 PRINT A 

画 

HBC 123 


区切りが；のときに続けて表示させても、数値の前に1文字分あいて見えます。 
これは符号（+，一）を表示しているのですが、正の+符号は省略されて空白（ス 
ペース）として表わされるので、あいているように見えるのです。 


〔練習問題〕 

任意の半径を入力して、円の面積を求め、 GOTO 文により繰り返すプログラム 
を作る 0 公式 ： S = ； zf 2 (苁は@4と押す） 


まず、フローチャートは次のようになります。変数は公式にそって S 、 R を使 
います。 



•INPUT R 


• S = 疋木 R 木 R 


•PRINT S 


プログラム 
10 INPUT R 
20 S = tt * R*R 
30 PRINT S 
40 GOTO 10 


または 


10 INPUT R 

20 S =7 T 木 Rt 2 2 乗計算は” 2 # とも害きます。 


30 PRINT S 
40 GOTO 10 
























3-3-2 プログラムに判断させるく IF 〜 THEN 文〉 


プログラム中で大小の判断や自動的に制御ができたら、とても便利なものです。 
この判断をプログラム中で行なう命令が IF 文 です。 

IF 文は'' IF " と V THEN " の間の比較式により判断します。 


IF 比較式 THEN 


|行番号またはプログラムエリア 
i 命令文 


比較式の比較結果により、正しければマ HEN " 以降の行番号またはプログラム 
エリアにジャンプしたり、命令文を実行します。正しくなければ、次の行から 
実行を続けます。 

では実際に、 IF 文の働きを見てみましょう。 


例）任意の数を入力して、10より大きければ再び入力に戻り、10より小さけれ 
ばその値の2乗を求め、答を表示して再び入力に戻る。 

このプログラムを分析しますと、「入力部」、「判断部」、「計算部」、「表示部」の 
4つからできています。 

判断部のフローチャート記号は次のものを使います。 

正しければこちらに進む 

正しくなければこちらに進む 



この記号の、' YES 〃と、、 N 0〃の位置は逆でもかまいませんが、わかりやすくする 
ために、 、' YES "、、' NO " を付けておきます。 

では、フローチャートにしてみましよう。 



INPUT A 


•IF A > 10 THEN 10 

•B=A*A 

PRINT B 
GOTO10 
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フローチャートの左側に付いている数字は行番号で、このようにしておくと、 
すぐにプログラムにすることができます。 

10 INPUT A 
20 IF A >10 THEN 10 
30 B = A 氺 A 
40 PRINT B 
50 GOTO 10 

行番号 20 が IF 文の使い方で、比較式の結果が正しければ THEN 以降を実行し 
ますので、この場合は THEN 10で、行番号10へジャンプします。 

比較式に用いる比較記号には次のものがあります。 

左辺>右辺……右辺より左辺が大きい 
左辺く右辺……右辺より左辺が小さい 
左辺=右辺……右辺と左辺が等しい 
左辺2右辺……右辺より左辺が大きいか等しい 
左辺 S 右辺……右辺より左辺が小さいか等しい 
左辺+右辺……右辺と左辺が等しくない 

また、 、' THEN " は '' GOTO " の意味も含まれていますので 、 "THEN GOTO 10" 
は、' THEN 10〃と書くことができます。 

では、このプログラムを実行してみましょう。 

操作 表示 

RUNE 

5圍 

12囲 

9回 


このように、 IF 文により判断して、データを選ぶことができます。 

例）いくつかのデータを入力して、 "0" を入力したときにデータの平均を求める。 

このプログラムを分析しますと、「入力部」「判断部」「計算部」「表示部」に分 
けられます。しかし計算部は平均を求めますので、「合計を求める」「個数を数 
える」「平均を求める」の3つがあります。この3つのうち、平均を求める計算 
だけはヽ '0" を入力したときだけ実行すれば良いので、判断の後に続くと考えら 
れます。 
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この分析にもとづいて、フローチャートを作ってみます, 



このフローチャートからわかるように、データを変数 A に入れ、変数 A が0で 
あるかを IF 文により判断し、0でなければ合計とデータ数を求めて、再びデ ー 
夕入力に戻ります。もし A が0であれば平均を表示させ、終了します。ただし、 
1回目の入力が0であると0で割り算をすることになるので、エラーとなりま 
すから、注意してください。 

この例は前回より少しむずかしくなっていますので、ゆっくりと考えてください。 
まず計算部ですが、合計計算は合計を入れておく変数を決め、その変数に入力 
したデータを加えていく方法がとられます。ここでは合計用の変数を B として 
いますので、 、'B = B+A" という計算になります。（変数 B の内容に変数 A の内 
容を加えて、変数 B とします）データ数は1個のデータにっき1づっカウント 
していけばよいので、カウント用の変数（ここでは C) に1づっ加えていけばよ 
いのですから、 、'C = C+1" となります。 

では、肝心な判断部を見ますと、 A が0であれば平均を表示しますので、 PRINT 
文により平均の計算結果を表示させます。 PRINT 文では変数の値の他に計算式 
を書けば、計算式の結果(答）を表示しますので、 "PRINT B/C" となります。 
IF 文では THEN の後に命令文も書けますので、 THEN の後に'' PRINT B/C" 
を続けて書きます。 

ここで1っ問題になることがあります。それは変数 B と変数 C で、このままプ 
ログラムにすると、前に何かの値が入っていればどんどん加算されていきます 
ので、答が違ってしまいます。そこで変数 B と変数 C に0を入れておかなけれ 
ばなりません。これは'、 B = 0"、 V C = 0" となります。この2っの代入式に別々 
の行番号をっけてもかまいませんが、短いプログラムは マルチステ ー トメント 
という，："で続けて、 ''B = 0 •• C = 0" と書くことができます。 

では、プログラムにしてみましょう。 
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10 B =0： C =0 
20 INPUT A 

30 IF A =0 THEN PRINT B/C 
40 B = B+A 
50 C = C +1 
60 GOTO 20 

これでプログラムができましたが、平均を表示させてもプログラムは終了しま 
せん。そこで、行番号 30 の PRINT 文の後にマルチステートメントで END 文を 
加えます。 

30 IF A =0 THEN PRINT B / C：END 

このように、 IF 文は比較式により判断を行ない、その結果によりプログラムの 
進行を決めます。 

春 IF 文の応用 

今迄出てきた例では、1つの判断によりプログラムの進行を決めていましたが、 
もし判断が2つ以上あり、全ての条件を満たさなければならないときはどうし 
ましょう。 

たとえば、任意の数値を入力し、 1 〜 9 のものだけを選ぶとします。 

これを別の考え方をすれば、〇より大きく、10より小さいということですので、 
、'〇 く変数"と、'変数く 10" の2つの比較が必要です。 

これを1行に書くとすれば次のようになります。 

IF 0く変数 THEN IF 変数く 10 THEN . 

比較条件が3つ以上の場合も同様にできますが、複雑になりすぎたり、1行が 
長すぎたりしますので、2つ位にしておくのが良いと思います。 

1 ^ ワンポイ 、ノトレツ スン 

マルチステー トメント （ ： ） 

マルチステ ー トメント は短い代入式などを 1 行にまとめたり、 IF 文の THEN 以 
降でいくつもの命令があるときなどに便利です。 

例 1) 


今 10 A=1 ： B=2 ： C=3 
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例 2) 


50 C = A+B 
60 D = A - B 
70 E = A 氺 B 
80 F = A/B 


今 50 C = A + B : D = A - B : E = A 水 B : F = A/B 


IF 文中で THEN 以降にマルチステートメントを使う場合は、比較式が正しいと 
きにだけマルチステートメント以降を実行しますので、注意してください。 

例 3) IF A <0 THEN A =10； B =20： …… 

比較が正しいときにだけ実行します 

マルチステートメントはプログラムをまとめるのに便利ですが、あまり1行を 
長くしすぎると逆に見'^らくなりますので、適当な長さで次の行に分けて書い 
てください。 


〔練習問題〕 

入力した数値を0より大きい数と小さい数に分けて合計を求めるプログラムを 
作る。 

くヒント〉 

数値入力後、 IF 文により2つの変数のどちらかに合計させる。 

なお、合計を取る変数はあらかじめ0を代入しておく。 
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ブログラム 

10 A =0： B =0 
20 INPUT C 

30 IF C >0 THEN A = A + C：GOTO 50 
40 B = B+C 
50 PRINT A；B 
60 GOTO 20 

変数 A と B に 0 を代入しておきますが、マルチステートメントで続けなくても 
かまいません。 

行番号30の IF 文では、入力した値(変数 C の値)が0より大きいかを判断して、 

0より大きいときは THEN 以降で変数 A に合計をとり、そうでないときは行番 
号40で変数 B に合計をとります。 

行番号50では入力するごとに各々の合計を表示させます。 


3 — 3 — 3 プログラムを繰り返すく FOR.NEXT 文〉 

ある一定の回数だけ計算などを繰り返す場合に、 GOTO 文や IF 文の組み合わせ 
ではプログラムが長く複雑になってしまいます。繰り返しの回数がわかってい 
るときなどは、もっと簡単にプログラムを組みたいものです。そこで、この繰 
り返しを簡単に行なう命令が FOR • NEXT 文です。 

FOR • NEXT 文は、 FOR 文と NEXT 文の間にある計算などの作業を指定回数 
分だけ繰り返します。 

FOR 文は、 

FOR 制御変数=初期値 TO 終値 STEP 刻み幅 

という形式です。 

NEXT 文は、 

NEXT 制御変数 

という形式です。 

FOR 文中で、制御変数として使えるのは A や B のような1文字の数値変数だけ 
で、配列変数は使えません。初期値、終値、刻み幅は数式や数値変数で与える 
ことができ、初期値から終値を越えるまで、亥I]み幅づつ制御変数を変化させて、 
繰り返します。刻み幅は省略でき、省略した場合は1となります。 

次のプログラムを記憶させて実行すると、 FOR • NEXT 文の動きがよくわかり 
ます。 


10 INPUT A 

20 FOR B =1 TO 10 STEP A 
30 PRINT B 
40 NEXT B 
50 GOTO 10 
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このプログラムを 実行しますと、次のようになります。 

操作 
RUN S 3 

3 ■ 

1TH 
涵 
明 
圏 

0.8 回 
趣 



このように 、 FOR • NEXT 文は初期値から終値までを刻み幅で繰り返します。 
なお、制御変数に使う変数名は、ここでは B を使っていますが、一般には I 、 

J 、 K がよく使われます。 

例）データ数を入力し、データの合計と平均を求めるプログラムを作る。 

このプログラムでは、まずデータ数を入力し、その後に FOR . NEXT 文により 

個々のデータを入力して合計を求めます。データの入力が終れば、後は合計と 
平均を表示させます。 

最初にフローチャートを作ってみましょう。 



業に移すことを表わします。 

このフローチャー トをもとにしてプログラムを作ります。 











































10 D =0 
20 INPUT A 
30 FOR B =1 TO A 
40 INPUT C 
50 D = D+C 
60 NEXT B 
70 PRINT D , D/A 
80 END 

このように、データ数がわかっている場合には、 FOR • NEXT 文により繰り返 
してデータ入力や計算を行なうことができます。 

行番号20のように、データ数を INPUT 文により入力せずに、直接、行番号30の 
A のかわりに書き込むこともできます。このときは行番号20は不要となります。 


〔練習問題〕 

階乗を計算するプログラムを作る。 

くヒント〉 

51=1X2X3X4X5 ですので、 FOR • NEXT 文により回数分ループさせ 
て計算する。 


ノロチヤート 
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プログラム 
10 INPUT A 
20 C =1 

30 FOR B =1 TO A 
40 C = C 木 B 
50 NEXT B 
60 PRINT C 
70 END 

行番号 20 は階乗を求める変数 C に 1 を代入しておきます。これは、階乗計算の 
ときに C の値が初期値でないと答がかわってくるからです。 

行番号30から50の FOR • NEXT 文で階乗計算をします。これは、変数 B の値を 
1 から 1 つづつ増やしてゆき、 1X 2 X 3 X…… と計算して階乗を求めます。 
行番号70の END 文により、1回の計算でプログラムは終了しますが、繰り返し 
計算するときは、行番号70を'' GOTO10" としてください。 


3-3-4 複雑なプログラムに便利なサブルーチン 

く GOSUB • RETURN 文〉 


プログラム作りに慣れてくると、プログラムが長く複雑になったり、同じ操作 
をする部分が何回も出てきたりします。このようなときに、プログラムをブロ 
ックごとに作り上げ、構造化してスッキリさせたり、同じ部分を共通して使え 
るようするのがサブルーチンと呼ばれるものです。 


サブルーチンは副プログラムとも呼ばれ、プログラム全体の流れを制御するメ 
インルーチンに対し、部分的作業を受け持つのがサブルーチンです。 



では、実際のプログラム例で働きを見てみましょう 
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例）順列と組み合わせを求めるプログラムを組む 
公式：順 列 nPr = (n ^ ! r) — 

組み合わせ ^=( r ! (^ L r )! 

この プログラムでは2 つの データ ( n 、 r ) を入力し、順列と組み合わせを求めます。 
まず、簡単フローチャートを作ってみましよう。 



このフローチャートの中で、順列と組み合わせの計算の部分をもう少し詳しく 
してみましよう。 



2つの計算の中で、 n !、（ n — r )! を求める計算が共通していることに気づくと思 
います。そして、さらに詳かく見ると、階乗計算が3回行なわれます。この階 
乗計算は前節の練習問題で行なっていますので、わからない方は前に戻っても 
う一度やりなおしてください。3回の階乗計算をその都度行ないますと、かな 
り長いプログラムとなります。 
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プログラム例 （1) 


10 INPUT N,R 
20 A=1 


30 FOR B=1 TO N 
40 A=A 氺 B 
50 NEXT B 
60 E=A 
70 A=1 

80 FOR B=1 TO N-R 
90 A=A*B 
100 F=A 
120 P=E/F 

130 A=1 . 

140 FOR B=1 TO R 


n! 計算 


(n-r) 計算 


n! 

Xn—rjJ 


計算 


150 A=A 氺 B 


160 NEXT B r! 計算 

170 G=A 


180 C=E/G/F 
190 PRINT P,C 
200 END 



n! 

r\ fn-r)! 


メモリー内容 

N : n 
R : r 
P :順列 
C :組み合わせ 
A :階乗用変数 
B : FOR • NEXT 

ループ用変数 
E : n \ 

F : ( n — r ) ! 

G ： r! 


このプログラムの中で、3つの階乗計算は共通のプログラムを使っています。 
異なる点は FOR 文中の終値です。この終値も共通の変数で制御できれば、こ 
の 3 つの計算を完全に共通化できます。この共通化して使う方法が サブルーチ 
ンとしての使い方です。 


なお、終値に変数 H を使って共通化するには、変数 H に n 、 n - r 、 r の値を 
前もって入れておく必要があります。 

では、このプログラムを サブルーチン 方式に変更しますが、 サブルーチンに 作 
業を引き渡す命令と、作業終了後に再び戻ってくる命令が必要です。この2つ 
の命令か、'' GOSUB " と \、 RETURN " です。 


プログラム例 （2) 

10 INPUT N f R 
20 H=N 

30 GOSUB 150 
40 E=A 
50 H=N-R 
60 GOSUB 150 
70 F=A 
80 P=E/F 
90 H=R 

100 GOSUB 150 










110 G=A 
120 C = E / G/F 
130 PRINT P 
140 END 
150 A =1 
160 FOR B =1 
170 A = A 氺 B 
180 NEXT B 
190 RETURN 


C 

TO H 

► サブルーチン 


サブルーチンはこのように共通な部分を持つプログラムを、短かく、スツキリ 


と仕上げてくれます。 

この例では1行分しか短かくなっていませんが、もっと複雑になってきたり、 
大きなプログラムを作り上げるうえでは、重要な役割りを持っています。初めの 
ぅちはあまり使わないかもしれませんが、覚えておくと便利に使える命令です。 


〔練習問題〕 

標準編差を求めるプログラムを作る。ただし、データ入力部と総和、 
データ数の算出部分はサブルーチンとして作る。 


公式： 


h :総和 
2 x : 2乗和 


2乗和、 


くヒント〉 n :データ数 

データ 入力衿 if 文により、、〇"であればメインルーチンに戻り、標準偏差を求 


める。平方根は SQR を使う。 
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B = B+A 
C = C + A 氺 A 
D = D +1 
GOTO 100 


プログラム 

10 B =0 : C =0 : D =0 
20 GOSUB 100 
30 E = SQR (( C — B * B / D )/ D ) 
40 PRINT E 
50 END 
100 INPUT A 

110 IF A =0 THEN RETURN 


サフルーチンへ 
標準偏差 


総和 
2乗和 
デーダ数 


サブルーチン 


このプログラムでは、行番号20でサブルーチンへ作業を引き渡し、行番号100か 
らのサブルーチンでデータ入力と総和、2乗和、データ数のカウントを求めて 
います。 

行番号110の IF 文はデータ入力終了の判断で、0を入力すると'' THEN 〃以降に 
進み、メインルーチンへ戻ります。 

なお、行番号50のように、メインルーチンの最後には必ず END 文を入れてくだ 
さい。 

3-3-5 関数を使う 

マニュアル 計算でも使いましたが、プログラム中に関数を書き込んでも使えま 
す。プログラム中でも使い方は同じですので、ここでは実際のプログラム例と 
していくつかを説明します。 

例彳）三角関数 

左の三角形で辺 A と角ぴを入力して、辺 
B の長さを求める。 

公式： B = A - sin a 
単位：度 

プログラム 例 操作例 

10 INPUT A,D RUNES 

20 MODE 4 (辺 A)15® 

30 B=A 氺 SIN D (角 a) 30BS 
40 PRINT B 
50 END 


表 示 



0 0 0 0 
2 3 4 5 

1— ^ - 1— T— 


行番号 20 は角度単位の指定で、ここでは度で計算しますので、' MODE 4" となり 
ます。 

行番号30で三角関数を使って計算します。 
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例 2) 三角関数 



左の円で、半径 r と角度0を入力して点 
P の 座標 （八;?/) を求める。 

公式 ：x = r - cos 6 
y = r » sin d 
単位：ラジアン 


プログラム例 

10 INPUT R,T 
20 MODE 5 
30 X = R 水 COS T 
40 Y = R 氺 SIN T 
50 PRINT X,Y 
60 END 


操作例 
RU _ 
(半径） RU 5 S 3 
(角 d ) 7 t /3 E 3 


表 示 




角度単位がラジアンですので、行番号20で MODE 5を指定します。 
行番号30と40で X 座標、座標を求めます。 


例 3) 逆三角関数 



左の三角形より、辺 A 、 B を入力して角 
度 a を求める。 

公式 ： a Wan — 1 早 
単位：度 


プログラム例 

10 INPUT A,B 
20 MODE 4 
30 D ： ATN ( B / A ) 
40 PRINT D 
50 END 


操作例 
RUNISi 
(辺 A ) 100 (S3 

20 IS 3 


表 示 


'14„ 5742162 I 


例 4) 10 進 ^60 進変換 

時間計算をするプログラムを作る 


プログラム例 


操 

作例 

表示 

10 

T =0 



RU _ 


20 

INPUT 

D , E，G 

(時） 

1 m 

.フ 

30 

S=SGN 

D 

(分） 

25133 

? 

40 

D=ABS 

D 

(秒） 

36圏 

1° 25 ? 36 

50 

T = T + S 木 DEG ( D . E . G ) 


Bin 

? 

60 

PR INT 

DMS $( T ) 

(時) 

2m 

•つ 

70 

GOTO 

20 

(分) 

15 IS 1 


(秒) 

bm 

3 - 40 ? 41 




















行番号 20 では時•分•秒を 3 つの変数 D 、 E 、 G に入力します。 

行番号 30 と 40 は減算するときのためで、時に負符号（一）をつけて入力すれば、 
前回までの結果から次の時間を減算します。もし、加算だけを行なう場合は不 
要です。 

行番号 50 で合計を求めますが、変数 S には加算のときは 1 が、減算のときは一 1 
が入っていますので、加算•減算ができます。 DEG 関数は 60 進数の時•分•秒 
を 10 進数に変換する関数で、合計計算は 10 進数で行なわれます。 

行番号 60 は表示用で、 10 進数を 60 進数に変換する DMS$ 関数を使って表示します。 


例 5) 乱数発生 
I から99までの乱数を作る。 

プログラム例 

10 R = INT ( RA _*99) + 1 
20 PRINT R 
30 GOTO 10 

行番号 10 で乱数を作ります。この例では 1 から 99 ですので、 RAN# に 99 をかけ 
て、1を加えます。 

乱数が 5 から 9 のとき—丨 NT ( RAN # 氺5 )+5 
乱数が 10 から 20 のとき一> INT ( RAN # 氺11 ) + 10 

この他にもいくつかの関数がありますが、同じように使えます。 


3 — 3 — 6配列を使う 

配列とは配列変数のことで、一般の A から Z までの変数の使い方とは異なり、 
同じ変数名でも番号で管理する変数です。 

変数名はアルファベット1文字で、 A から Z までが使え、その変数名に管理番 
号がつきます。 

例） A ( 1 ) 

1 -管理番号(添字） 

-変数名 

配列変数は、多量のデータを扱うときに便利ですので、使い方を充分覚えてく 
ださい。 

たとえば、 10 個のデータを入力するには、 

FOR A =1 TO 10 
INPUT N ( A ) 

NEXT A 
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50 個のデータの中から一番大きいものを選び出すには、 


A=0 

FOR B=1 TO 50 
IF P(B)>A THEN A=P(B) 
NEXT B 
PRINT A 


配列変数を使用するときは、配列の取り方に注意してください。配列変数とし 
て使う変数と、一般の変数として使う変数の箱が、一部共通に使う所があり 
たとうば変数名を A とした場合 、 A (0) は A と同じ箱で、 A ( l ) は B と同じ箱 
……というように共通の箱を使っていますので 、 A (0) と A を同じプログラム 
内で使うと変数内のデータがかわってしまいます。 

共通している部分は次のようになっています。 


A B 
A(0) A( 1 ) 
B(0) 


C 

A(2) 
B(1) 


D 

A(3) 

B(2) 


X 

Y 

Z 

A(23) 

A(24) 

A(25) 

B(22) 

B(23) 

B(25) 

X(0) 

X(1) 

X(2) 


Y(0) 

Y(1) 
Z(0) 


このために、配列変数により多量のデータを扱う場合は、その他の必要な変数 
と重ならないように注意してください。 

配列変数を使用するときのもう一つの注意点は、メモリーの増設です。一般災 
数で使う A から Z と共通する部分を使う場合は、増設する必要ありませんが、 
それ以上の変数を使う増合は必ず増設を行なってください。 

メモリーの増設は DEFM 命令により行ないます。 

DEFM 命令は、1個単位でいくつ増設するかを指定します。 

たとえば、10個を増設する場合、 


マニュアルでは、 DEFM 10 ■ 
プログラム中では、行番号 DEFM 10 
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この命令はマニュアルでもプログラム中に書き込んでも使えますが、配列を使 
うときなどは、プログラムの最初の方にこの命令を書き込んでおいてください。 
では、実際に配列変数を使ったプログラムを見てみましよう。 


例）配列変数 G (0) 〜 G ( 99) に 0 から 99 の乱数を入れ、大きい順に並びかえ 
て表示する。 


プログラム例 

10 DEFM 80 

20 FOR B=0 TO 99 

30 G(B)=INT(RAN#*100) 

40 NEXT B 
50 BEEP 1 
60 FOR B=0 TO 99 
70 A= — 1 

80 FOR C=B TO 99 
90 IF G(C)>A THEN A=G(C) ： D=C 
100 NEXT C 

110 E=G(B) ： G(B)=G(D) ： G(D)=E 
120 NEXT B 


乱数により 
G (0) 〜 G (99> に 
0 〜 99 を代入する 


大きい順に並びかえる 


130 BEEP 0 

140 FOR B=0 TO 99 1 

150 PR I NT G( B ) 順番に表示する。 

160 NEXT B J 

170 END 


このプログラムは、大きくわけて 3 つの部分からできています。1つ目は乱数 
により0から99の数値を作り出し、配列変数 G (0) から G(99) に代入します。 

2つ目が並びかえで、大きい順に並びかえます。3つ目は表示で、並びかえ終 
ったデータを大きい順に表示します。 

行番号50と130の BEEP 文は、ブザー音を発生させるためで、、、 BEEP1" で高音 
を、 ''BEEP 0" で低音を発生します。 この 2 つの 行は、 データの 作成と並び か 
え終了のサインとして音を発生させていますので、なくてもかまいません。 

行番号60〜120が並びかえで、全部のデータの中から1番大きいものを選び出し 
て1番目の変数に入れ、次に2番目以降から最も大きものを選び出し……とい 
う操作を操り返します。 
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丨回目 


2回目 


3回目 


4回目 


73 


90 


65 


99 


71 


d 


99 


90 


□ 


65 


73 


71 



なお、行番号10の DEFM 文はメモリーの増設で、 G (0) 〜 G (99) までの100個の 
変数の内、20個が G 〜 Z の変数となりますので、残りの80個を増設します。 
このように配列変数を用いると、多量のデータを扱うのに便利になります。 


〔練習問題〕 

10個のデータを入力し、合計と各々のデータの構成比を求める。構成比は百分 
率で、小数以下2桁まで求める。 
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プログラム 

10 A =0 

20 FOR B=0 TO 9 
30 INPUT G(B) 

40 A=A+G(B) 

50 NEXT B 
60 PRINT A 
70 SET F2 
80 FOR B=0 TO 9 
90 PRINT G(B)/A 氺 100 
100 NEXT B 
110 SET N 
120 END 

行番号 20 〜 50 までがデータ入力部で、 FOR . NEXT 文により G (0) 〜 G (9) に 
10個のデータを入力します。行番号70の '' SET F 2" は、構成比を百分率で小数 
以下2桁まで表示するための小数以下指定です。行番号80〜100で構成比を百 
分率で表示します。行番号110では、小数以下指定を解除しておきます。 


3-3~7データを読み込むく READ . DATA . RESTORE 文〉 

ここでは、データ処理の 一つの 方法として、プログラム中にデータを書き込む 
'' READ "、、' DATA ' '' RESTOR " について説明します。 

データの入力方法に INPUT 文がありますが、 INPUT 文はプログラム実行中に 
を表示してキーボードからデータを入力します。 READ 文はプログラム中 
の DATA 文に書かれているデータを変数に読み込みます。 


例） DATA 文にある 10 個のデータを読み込み、表示する。 


プログラム 

操 作 

10 FOR B=1 TO 10 

RUNE3 

1 

20 READ A 

趣 

.つ 

30 PRINT A 

晒 

3 

40 NEXT B 


50 DATA 1 ， 2,3,4,5, 


6,7,8,9,10 


60 END 


10 
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READ 文は、必ず DATA 文と対で使われ、 、' READ " に続く変数に、 DATA 文か 
ら持ってきたデータを代入します。 

READ 文の後の変数は，（カンマ）で区切ることにより、いくつでもかくことが 
できます。 


例 2 ) プログラム 操 作 

10 READ A$,B$ RUN (S3 

20 PRINT A$,B$ 

30 END 

40 DATA CAS 10,PB - 400 

DATA 文の位置はプログラム中のどこにあってもかまいません。プログラム実 
行後は行番号の若い DATA 文の最初のデータから順に変数に代入していきます。 
READ 文中の変数は、 DATA 文に書いてあるデータが数値のときは数値変数を、 
文字のときは文字変数を使ってください。 

例）プログラム 

10 RESTORE 
20 READ A$ 

30 PRINT A$ 

40 READ B 
50 PRINT B 
60 RESTORE 100 
70 READ C$ 

80 PRINT C$ 

90 DATA ABC 
100 DATA 123456 
110 END 

RESTORE 文で、行番号を指定しないとき、次の READ 文で読み込むデータは、 
そのプログラム中に書かれている最初の DATA 文の最初のデータです。行番号 
の指定があるとき、次の READ 文で読み込むデータは、指定した行番号の DATA 
文の最初のデータです。 


操 作 
RU_ 

趣 

丽 


表 示 


HBC 


123456 


HBC ： 


_表 7 F 

U H 〇 i U p d - 4 0 h 
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〔練習問題〕 

札帳、東京、名 古屋、 大阪、 福岡の地名をプログラム 中で 読み込み、 付随す る 
データを入力して、大きい順に並びかえる。 

ただし、地名は G $(0) 〜 G $(4) に読み込み、データは L (0) 〜 L (4) に入力する。 

フロチャート例 
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プログラム例 

10 FOR A=0 TO 4 

20 READ G$(A) 

30 PRINT G$(A )； 
40 INPUT L(A) 

50 NEXT A 
60 FOR A=0 TO 4 
70 C=0 

80 FOR B=A TO 4 


メモリー 

A : FOR-NEXT 文用 
B : FOR.NEXT 文用 
C :最大値 
D :最大値の番号 
E :並びかえ用 
F $: 並びかえ用 

G$(0) 〜 G$(4):_g 
L ( 0 ) 〜 L ( 4 ) : データ 


90 IF L(B)>C THEN C=L(B) ： D=B 
100 NEXT B 

110 E=L(A) ： L(A)=L(D) ： L(D)=E 
120 F$=G$(A) ： G$(A)=G$(D) ： G$(D)=F$ 

130 PRINT G$(A) ； L(A) 

140 NEXT 

150 DATA SAPPORO,TOKYO,OSAKA,NAGOYA,FUKUOKA 

このプログラムは、大きくわけて 2 つにわけられます。1つ目は行番号10〜50 
までの入力部で、2つ目は行番号60〜140までの並びかえ部です。入力部は 
F 0 R - NEXT 文で5回ループさせる間に、 DATA 文より地名を読み込み、同時 
にデータも入力します。行番号30の PRINT 文は、次の INPUT 文によりデータ 
入力をする前に、地名をメッセージとして表示させるためです。並びかえは前 
回に行なったものと同様ですが、ここでは地名とデータの2つを同時に並びか 
えますので、行番号110と120のようになります。このプログラムでは手間をは 
ぶくために、並びかえと同時に結果を表示させています。 

行番号150のデータ文は、どこの位置に入れてもかまいませんが、一般には最後 
の方に入れておく方が見やすいと思います。 


3-3-8 間接指定く ON 〜 GOTO 、 ON 〜 GOSUB 文〉 

GOTO 文と GOSUB 文の機能については、もうおわかりだと思います 。 GOTO 
文や GOSUB 文はプログラム中に直接行番号やプログラムエリア番号を書き込 
んで指定しますが、処理の都合上、演算結果やデータにより分岐先が異なる場 
合があります。このような場合に IF 文で条件を判断していては大変です。もっ 
と便利な命令はないでしょうか。？ 

分岐先をプログラム中で判断して指定する命令が、間接指定の ''ON 〜 GOTO" 
と、' ON 〜 GOSUB" です。 

ON 〜 GOTO 文と ON 〜 GOSUB 文は似たような機能を持っています。 


例 ) 


ON A GOTO 100, 200, 300, 400 

i’ 1 - ^ _ A=2 ' 


A=3 


Ai=4 


A=1 


A=2 




^ 9 十 1 " 

I 

A=3 

A=4 




'' ON " に続く数値変数や計算式の結果により、 1 であれば1つ目の分岐先に、2 
であれば2つ目の分岐先に、……と分岐します。変数や計算式の値よりも分岐 
先の数が少ないときや該当する分岐先がないときは、次の行またはマルチステ 
ートメント以降の命令に進みます。 

例） 

10 INPUT A 


20 ON A GOTO 100,200 ,300,400,500 


30 PRINT ' 、 NO" 
40 END 

100 PRINT、'UNE 
200 PRINT ''LINE 
300 PRINT、'LINE 
400 PRINT NN L INE 
500 PRINT ''LINE 


100 〃 : END 
200" : END 
300 〃 : END 
400 〃 : END 
500 〃 : END 


〔練習問題〕 

角度と 4 〜 5 の数値を入力し、間接指定で角度単位を指定するサブルーチンへ 
分岐して、サイン （ SIN ) の答を求める。 

フロチヤート 
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プログラム 

10 INPUT 、、 KAKUDO",A 
20 INPUT 、、丁 AN l",B 
30 ON B-3 GOSUB 100 ， 200,300 
40 PRINT SIN A 
50 GOTO10 
100 MODE 4 
110 RETURN 
300 MODE 6 
310 RETURN 
300 MODE 6 
310 RETURN 

このプログラムは 2 つのデータを 入力しますので 、 INPUT 文に メッ セージを加 
えて入力しやすくしました。行番号10では角度を変数 A に入力し、行番号20で 
は単位を変数 B に入力します。行番号30では ON 〜 GOSUB 文を使い、4〜6の 
数値を1〜3に直して分岐先を指定します。 

サブルーチンでは各々角度単位を指定して、元に戻ります。 

3-3-9 文字を扱う文字関数く LEN 、 MID $、 VAL 、 STR $> 


SIN や COS などは数値を扱う関数ということで、数値関数と呼ばれていますが、 
この他にも文字を扱う文字関数があります。 PB -400 には文字関数として％ EN " 
、' MID $"、、' VAL "、、' STR $ "があります。 

• し EN 

LEN 関数は文字変数内の文字列の数を数えます。 

例） 

0@ 占巨 ) @c£dS 回 0@ 占 0 _ 

BBBSaCSSctSczDE 3 _ 

※ LEN 関数では配列変数は使えません。 

• MID$ 

MID $ 関数は専用文字変数 （$) に記憶されている文字列の中から、いくつかを 
取り出す関数です。取り出し方は、ヰどこから"、〜'いくつ〃取り出すかを指定し 
ます。 

例） 操 作 

10 $=、'CASIO PB —400" RU_ 

20 PRINT $ m 

30 PRINT MID$( 1,5) ■ 

40 PRINT MID$(7,6) 

50 END 


表 示 

CASIO PB-400 

CRSIQ_ 

PB-400 








操 作 

A=147 ： B=258 RUNES 

PRINT A+B m 

PRINT STR$(A)+STR$(B) 
END 


表 示 


123456 


• VAL 

VAL 関数は文字変数内に記憶されている数字を数値に変換します。 

例） 操作 表 示 

10 A$= 、 '123":B$= 、 '456" RUNE 「 12345 「 

20 PRINT A$+B$ m 5 79 

30 PRINT VAL(A$)+VAL(B$) 

40 END 

浓 VAL 関数では配列変数は使えません。 

• STR$ 

STR $ 関数は VAL 関数とは逆に、数値変数内に記憶されている数値を数字に変 
換します。 


例） 

10 INPUT $ 

20 FOR A=1 TO LEN($) 

30 PRINT MID$(A,1); 

40 BEEP 1 
50 NEXT A 
60 END 

このプログラムは、専用文字変数に入力された文字を、 MID$ 関数により 1 文 
字づつ取り出します。取り出す位置の指定は FOR • NEXT 文により決めますが、 
終値は LEN 関数により求めます。 

行番号 30 の最後の ''; 〃は、続けて表示させるため、表示しても止まらないよう 
にします。 

例） 

10 A=1 ： B=0 

20 PR INT ' 、ぐ , ； STR$( A) 

30 INPUT $ 

40 IF $= NX END ,/ THEN 100 
50 B=B+VAL($) 

60 A=A+1 
70 GOTO 20 
100 PRINT B/(A—1) 

110 END 


0 


w 


0 0 0 
2 3 4 








このプログラムは、データ数のわからないデータの平均を求めます。データ入 
力の終了は、、 END " を入力することにより行なわれ、行番号100に分岐して平均 
を表示します。 

行番号20は入力をしやすくするためのメッセージで、数値変数 A をそのまま表 
示しますと符号桁として数字の左側が1文字分あきますので、文字としてあか 
ないようにしています。 

行番号50では、データを文字として専用文字変数に入力していますので、数値 
に変換して合計計算をします。 

なお、このプログラムでは、' END " 以外の文字を入力しても、データ入力終了と 
はなりませんので、 '' END " と数値以外の入力ではエラー (ERR 2 ) となります。 

3-3-10 覚えておくと便利な入出力制御関数く KEY$、CSR > 

入出力制御関数とは、データの入力や出力を制御する関数で/ KEY$ "ど CSR" 
があります。 

KEY $ 関数は、データを入力するときに使いますが、 INPUT 文とは次の点が異 
なります。 


INPUT 文 

KEY $ 関数 

• 数値は仮数12桁、指数2桁以内0 

♦文字は文字変数7文字、専用文字 

変数30文字以内。 

♦押されたキーを1文字分だけ指定さ 

れた文字変数に読み込みます。 

春、、？〃を表示して入力待ちとなる。 

♦何も表示せずに入力待ちとならない0 


例） 

10 INPUT A 
20 PRINT A 
30 B$=KEY$ 

40 IF B$=、 w/ THEN 30 
50 PR I NT B$ 

60 END 

行番号 10 は INPUT 文の使い方ですが、行番号30と40が KEY $ 関数の使い方です。 
KEY $ 関数はキーボードから1文字 （1 キー）分の入力だけを受けつけますが、 
キーを押しても押さなくても入力待ちで停止しません。そのため、行番号40の 
ように IF 文と組み合わせて、キー入力がなければ再び行番号30に戻り、キー入 
力可能な状態にします。 

KEY $ 関数はこのように IF 文と組み合わせて使われます。 
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例） 

10 A$=KEY$ 

20 IF A$= NN 1 7, THEN 100 

30 IF A $=、、2" THEN 200 

40 IF A $=、、3" THEN 300 

50 GOTO 10 

100 PRINT 、、 LINE ” 100": END 
200 PRINTLINE 200 7/ : END 
300 PRINTLINE 300": END 

KEY $ 関数の使い方として、このような例もあります。前例では キーが 押され 
たかをチヱック してい ましたが、この例では押された キーが 1 か 2 か 3 かをチ 
ヱックして、合っていれば次の作業に進みます。 

ただし、この例のように KEY $ 関数が プログラムの 先頭の方に書き込まれてい 
るときは、 プログラムの スタートの仕方に注意してください。 プログラムの ス 
タート方法として2つの方法がありますが、のようなスタートの方法では、 
最後のキー操作として 0] キーを押しています。 プログラムが スタ—卜するとす 
ぐに KEY $ 関数でキー入力を読み込みますので、数字キーを押したままでは、 
そのキーが入力されてしまいます。 

ためしに、プログラムエリア pi にこのプログラムを記憶させ、として見 
てください。 キーを 少しでも長く押していると、、 LINE 100 "が表示されます。 
もし、先頭で KEY $ 関数を使う場合は、次のリストを加えてください。 

5 A $= KEY $ 

6 IF A $ キ、 ' "THEN 5キーがはなされるまで待つ 
10 A $= KEY $ 


CSR 関数は、データを表示するときの位置を指定するもので、 PRINT 文中で、 
使います。 

例） 

10 PRINT 、' A " 

20 PRINT CSR 2;、、 A " 

30 PRINT CSR 8;、、 A " 

40 END 

この例を実行させますと、 CSR 関数の働きがわかると思います。 

表不上の指疋は左端から〇、1、2、 . n となっていますので、最初の csr 

関数なしでは左端から表示されますが、 CSR 関数で指定しますと指定した位置 
から表示されます。 





PRINT 、、 A" 


A 


PRINT CSR 2; 、 'A" 


PRINT CSR 8; 、、 A" 


例） 

10 A=INT(RUN#*12) 

20 PRINT CSR A; 、 't" 

30 GOTO10 

このプログラムは乱数により〇〜11の数値を作り出し、 CSR 関数で' ' T " を表示 
させます。実行後、 is キーを押すたびに、が色々な所に表示されます。 

KEY $ 関数や CSR 関数を色々と組み合わせることにより、おもしろいゲームな 
どができます。 

例） 

10 D=0:$= 、、 01234567 89" 

20 FOR B=1 TO 10 
30 I F KEY$ キ " THEN 30 
40 A=INT(RA_*10) 

50 PRINT MID$( 1,A+1 > ; 、、 t";MID$( A+3); 

60 FOR C=1 TO 30 
70 E$=KEY$ 

80 I F E$4" THEN 100 
90 NEXT C 

100 IF E$ ぐ、 0" THEN 130 
110 IF E$> 、 '9 ,7 THEN 130 

120 IF VAL(E$)=A THEN D=D+1:BEEP 1: GOTO 140 
130 BEEP 0 
140 PRINT 
150 NEXT B 

160 PRINT CSR 2;、、R IGHT";D; 

170 IF D+10 THEN 210 
180 FOR B=1 TO10 
190 BEEP 1 : BEEP 0 
200 NEXT B 
210 END 


012345678910 11 





A 











0 1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 



A 
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このプログラムは0から9の数字が並んでいる中で、1文字だけ数字ではなく 
”"が出現します。この出現している場所の数字キー（回〜回)を押すゲームです。 
行番号40では乱数により作り出した〇〜9の数値に対応する場所に、 ' 个〃を表示 
させています。 

行番号30での KEY $ の使い方は、キーを1度はなしてから表示させるためで、 
前のキーを押し続けますと表示は出ません。 KEY $ 関数はその時点のキー入力 
を読み込みますので、このような使い方もできます。 

行番号60以降はキー入力の判断で、キーが押されれば繰り返しから抜け出し、 
正解かどうかをチェックします。行番号100と110は入力のチェックで、 IF 文に 
より文字も比較できますので、ここでは〇〜9以外は行番号130に分岐させて 
まちがいとします。この文字の比較は137ページのキャラクター表により決って 
いますので、くわしくは表を参照してください。 

行番号120は正解かどうかのチェックで、 KEY $ では文字として読み込まれます 
ので、 VAL 関数により数値に変換して比較します。 

行番号30のようにキーを押しているかいないかの判断だけでは、文字変数に代 
入せずに判断してもかまいませんが、行番号70から120までのように何回も判断 
させて正解を取り出す場合は、一度文字変数に入れて使います。では、このプ 
ログラムを記憶させて、遊んでみてください。 

操作例 

操 作 
囵 キーを 押す 
回 キーを 押す 
回 キーを 押す 


表 _ 7 K _ 

01 个 345 6789 

01234567 个 9 

0123 t 56789 


表示のかわる速度が速すぎる方は、行番号60の FOR 文の終値を30より大きくす 
れば、ゆっくりとキーを押せます。また、プログラムの先頭に レベルを 入力す 
る INPUT 文を追加して、速度を変えてみるのもおもしろいでしょう。 
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[ 3-4 あると便利なオプション 



PB -400 は本体だけでも、かなり便利に使えますが、オプションとしてカセット 
テープレコーダー用インタフェイス（アダプター）く FA -3> とミニプリンタく FP - 
12> があります。 

〈 FA -3> は PB -400 で組んだプログラムを短時間のうちに記録したり、呼び戻し 
たりできますし、メモリー内のデータも記録しておくことができます。 

< FP -12> はプログラムやデータを印字するミニプリンタで、プログラムのリス 
卜（内容）を印字して保存したり、計算結果を印字することができます。 

では、各々の機能を簡単に説明していきます。 

3-4-1 プログラムやデータを保存する 

プログラムやデータを カセッ トテープに保存するには、 < FA -3> が必要です。 
PB -400 と FA -3、 FA -3 と テープレコ ー ダーの 接続の仕方および注意事頃につい 
ては、 FA -3 に付属の取扱説明書をご覧ください。ここでは主に、使い方につい 
て説明します。 


■プ ログラムの 記録 およ び呼び戻し 

PB -400 にプログラムを記憶させていくと、次のプログラムを記憶させたいが、 
もう入らなくなることがあります。こんなときに、前のプログラムを消してし 
まっては、後でもう一度使いたいときに不便です。ここで FA -3 が真価を発揮 
します。 

プログラムを記録する命令は、 'SAVE 〃または、 'SAVE ALL 〃で、 '' SAVE " は P 0 
だけとか、 P 9 だけというように、1つのプログラムエリア内のプログラムだ 
けを記録します。 ''SAVE ALL " は P 0 から P 9 までの10個のプログラムエリア 
内のプログラムを同時に記録します。 

SAVE 命令 

_ 回 R E H D V P n _ 

L ♦この番号のプログラムエリア内のブログラム 
が記録されます。 

SAVE A しし命令 

プログラムエリアに関係なく、 P 0から P 9までの10個のプログラムエリア 
内のプログラムが記録されます。 

SAVE 命令と SAVE ALL 命令は、単独のエリアだけのプログラムであるか、 
メインプログラムの他にもサブルーチンなどとしてプログラムを使っているか 
によって使い分けます。 





SAVE、SAVE ALL 命令ともマニュアルで実行します。 

例 ） save m 

SAVE、'CAS 丨〇 " ■ 

SAVE ALL m 
SAVE ALL ''PB" ■ 

SAVE と SAVE ALL の後に続く、、 " でかこんだ文字は、ファイル名と呼ばれ 
るキーワードで、記録するプログラムに個別の名前をつけておけば、後で呼び 
戻すときに名前を指定して呼び戻せます。ファイル名は 8 文字以内のアルファ 
ベットや数字などを '' 〃でかこんで書きます。 

プログラムの呼び戻しには、、 LOAD" または 、' LOAD ALL" を使います。 LOAD 
命令と LOAD ALL 命令は、記録したときに SAVE または SAVE ALL で記録 
したかにより使い分けます。 


呼び戻し 

記録 

LOAD 

LOAD 

''ファイル名" 

LOAD ALL 

LOAD ALL 

、'ファイル名" 

SAVE 

O 

X 

X 

X 

SAVE 、'ファイル名" 

O 

〇 

X 

X 

SAVE ALL 

X 

X 

〇 

X 

SAVE ALL ''ファイル名" 

X 

X 

〇 

〇 


※ 〇印は呼び戻し可。 

※ ファイル名は同一のものとする。 


例 ） LOAD m 

LOAD 、、ファイル名 " ■ 

LOAD ALL m 

LOAD ALL 、、ファイル名 " ■ 

LOAD 命令と LOAD ALL 命令により、 プログラムを 呼び戻すとき、 プログラ 
ムの記録の仕方により次の表示が出ます。 


記録方式 

表 示 

SAVE 

PF : 

SAVE v ファイル名" 

PF :ファイル名 

SAVE ALL 

AF : 

SAVE ALL ''ファイル名" 

AF :ファイル名 


SAVE 命令により記録したプログラムを LOAD 命令により呼び戻すとき、記録 
したプログラムエリアと呼び戻すプログラムエリアは同一でなくてもかまいま 
せん。 




















例） P0 のプログラムを記録 


P9 に呼び戻す 


くご注意〉 

プログラムを記録したり、呼び戻すときにうまくいかないことがあります。そ 
のようなときには次の点をチヱックしてください。 

春記録しているときに、' ERR 9〃が表示される。 

〔チェックポイント〕 

PB -400 と FA -3 が正しく接続されているかチェックする。 

❿呼び戻しているとき に、 N ERR 9 "が表示される0 
〔チェックポイント〕 

テープの 保存状態が悪く、伸びているようなときは、新しい テープと 交換する。 
テープレコーダーのへッ ドがよごれているときは、市販のク リーニン グキッ 
卜でへッドを クリ ーニ ング する。 

テープレコーダーのトー ン調整を中位にする0 
參呼び戻しているときに、 エラー も何も表示されずに、戻つてこない。 

〔チヱックポイント〕 

テープレコーダーの 出カボリウムが低いので、最高 ( MAX ) に近い位置までホ 
リウムを上げる。 

テープレコーダーの 出力規格が FA -3 に合わない。 

■データの記録、呼び戻し 

プログラムには データが つきものです が、 いちいち キーボー ドから入力してい 
てはめんどうなものです。 

ここでは、メモリー内のデータをテープに記録して、再び呼び戻す方堵を行な 
つてみましょう。 

データを記録するには " PUT " を使います。 

PUT 命令はファイル名をつけて、変数名で指定します。 

PUT 、、ファイノと^;， $,A，Z 

8文字以内の文字 A 〜 Z までの26個の変数を記録 

ファイル名はプログラムの記録と同じで、8文字以内の文字を、' "でかこみま 
す。変数名の指定は、専用文字変数 （$) があるときは最初に、次の2つの変数 
名で、、どこから〃、、、どこまで"の変数を記録するか指定します。 
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例） 

専用文字変数 （ $ ) と A から M までの13個の変数の内容を記録する。 

PUT $， A,M 

A から Z (10) までの変数の内容を、ファイル名 、' CASIO 〃 で記録する。 

PUT '' CASIO " A , Z (10) 

※メモリーが増設してある場合。 

変数名の指定はどこから、どこまでのように指定しますので、 、' A ， Z 〃という指 
定となり、 '' Z ， A 〃 のような指定はできません。 

なお、変数を文字変数として使っている場合でも、 X ' A $， Z $ "とせずに N ' A ， Z " 
とすることもできます。 

データの 呼び戻しには '' GET " を使います。 

GET 命令もファイル名をつけて、変数名で指定します。 

GET 、、ファイル名" $ f M # W 

8 文字以内の文字 M 〜 W までの変数に呼び戻す 

例） 

専用文字変数 （ $ ) と X から Z までの3個の変数にデータを呼び戻す。 

GET $， X，Z 

G ( 0 ) から G (99) までの変数に、ファイル名 ” PB 〃のデータを呼び戻す。 

GET '' PB " G (0) f G (99) 

※メモリーが增設してある場合。 

GET 命令により、データを呼び戻しているとき、次のような表示が出ます。 


記録方式 

表 示 

GET $, A,Z 

DF : 

GET 、'ファイル名" G , P 

DF :ファイル名 


3-4-2 記録を残す 

プログラムを 作るときに、 プログラム 内容を印字できれば、 デハ•ッグ や内容変 
更にとても便利ですし、演算結果を印字して残すのも便利なものです。 

ここではミニプリンタく FP -12〉 を使って印字させてみましょう。 

印字させるにはプリントモード C ' PRT " 点灯)でキー操作を行ないます。 

プリントモードは_[3と押すことにより指定され、■回と押すことにより解 
除されます。 

プログラムの内容を印字させるには、园 (3 と押した後、 LIST 命令を実行します。 


81 








例） 

次のプログラムを記録させます。 

10 INPUT A 
20 PRINT A 氺 A 
30 GOTO10 

記憶させた後に次の操作を行ないます。 

_0 L 1ST SS 印字例 

LIST 

16 INPUT fi 
20 PRINT m 
38 SOTO !0 

もし、 PO から PO までの 10 個のプログラムエリア全部の内容を印字させたい 
ときは、 

LIST ALL m 

と操作します。 

なお、印字後は_回と操作してプリントモードを解除してください。 

演算結果等を印字させるには、_0と押すか、プログラム中に '' MODE 7" を書 
き込みます。画 E 1 と押しますと、その後のキー操作全てが印字されますので、 
必要な所だけを印字させたいときは、プログラム中に書き込んだ方が便利です。 

例） 

演算結果だけを印字する。 

10 INPUT A 
20 MODE 7 
30 PRINT A 氺 A 
40 MODE 8 
50 GOTO10 

このプログラムでは、データ入力後にプリントモードを指定し、印字(表示もし 
ます）後プリントモードを解除して、再び入力に戻ります。 

なお、プリントモード中では PRINT 文による表示は停止せずに、印字後次の 
命令に進みます。 

MODE 7により印字後は 、 MODE 8でプリントモードを解除してください。 
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f 3-5 PB -100 のプログラムを使う i 


PB -100 や PB -300 で作られたプログラムは、ビジネスをはじめゲームまでたく 
さんあり、ライブラリーも出版されています。 

PB -400 も PB シリーズの1つとして、この豊富なプログラムを利用できますが、 
PB -400 には PB -100/300 以上のコマンドを持っていますので、もっと便利な使 
い方もできます。ここでは、 PB -100/300 により作られたプログラムを、 PB - 
400で使ってみましょう。 

■ PB - 400の相異点 

PB -400 と PB -100/300 の使っている BASIC 言語は、ほとんど共通しています 
が、 PB -400 の方が多くの命令を持っていますし、一部異なる点もあります。 

♦追加命令 

PASS (プログラム保護） 

BEEP (ブザー音） 

READ (DATA 文よりデータを読み込む） 

DATA (データを書いておく） 

RESTORE (読み込むデータを指定） 

ON 〜 GOTO (GOTO 文の間接指定） 

ON 〜 GOSUB ( G 0 SUB 文の間接指定） 

REM (注釈文） 

* 追加関数 

DEG (60 進数 —10 進数変換） 

DMS $ (10 進数->60進数変換） 

STR $ (数値を数字に変換） 

* 変更命令 


PB-400 

PB-100/300 

NEW (NEW ALL) 

CLEAR 

IF 〜 THEN 

SAVE ALL 

LOAD ALL 

VERIFY 

DEFM ( プログラム書き込み可 ) 

CLEAR(CLEAR ALL) 

VAC 

IF 〜； 

SAVE A 

LOAD A 

VER 

DEFM ( マニュアルのみ可） 
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隹変更関数 


PB -400 

PB -100/300 

KEY$ 

KEY 

MID $ 

MID 


以上のような相異点がありますが、 PB -100/300 で作られたプログラムは、 原則 

としてそのまま使えます。 

実は、 PB -400 には PB -100/300 で作られたプログラムを判別する機能を持って 
います。ただし、使いやすくするためや、後からの見直しを便利にするために、 
PB -400 用に手直しした方が良いと思います。 

例） 

PB -100 用プログラム 

10 VAC 

20 FOR A=1 TO 20 
30 INPUT Z(A) 

40 IF Z(A)>80 ； B=B+1：GOTO 90 
50 IF Z(AX60 ； C=C+1 ：GOTO 90 
60 IF Z(A>>40;D=D+1:GOTO 90 
70 IF Z(A)>20;E=E+1:GOTO 90 
80 F=F+1 
90 NEXT A 


この例はデータを入力して、データの大きさに応じて振り分ける部分です。こ 
のようなプログラムでも、そのまま使えますが、 PB -400 用のプログラムにする 
には、次の点を直してください。 

行番号10の、、 VAC " は 、' CLEAR " にする 

10 CLEAR 

行番号40から70の、';"は " THEN " にする。 

40 IF Z(A)>80 THEN B=B+1:GOTO 90 

(以下同じ） 

このプログラムでは変数の増設が必要ですので、 PB -100/300 ではマニュアルで 
実行していた DEFM 命令を、プログラムの先頭に書き込みます。 
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例 2) 

PB -100 用プログラム 

10 INPUT 、'1 =1 /0=2/P=3",N 
20 IF N<1 THEN 10 
30 IF N>3 THEN 10 
40 GOTO N*100 


このプロ グラム は作業に合わせて分岐先を振り分けるプロ グラムで すが、これ 
を PB -400 に合わせるには、 ON 〜 GOTO 文を用いて、次のように変更します。 

10 INPUT 、 ' 丨 = 1/0=2/P=3\N 
20 ON N GOTO 100,200,300 
30 GOTO10 


このように ON — GOTO 文を使うことによりスッキリできますし、判断により 
データ N をチェックする必要がなくなります。 

以上の内容に注意すれば、今迄作られている PB -100/300 用のプログラムがよ 
り有効に使えます。 

すぐにでも色々なプログラムを使ってみたい方は、市販されている PB - 100 〆 300 
用のプログラム集を利用できますので、とても便利です。 


〔注意〕 

PB -100/300 で作成されたプログラムを PB -400 で実行した場合に、そのままで 
は正しく実行しないことがあります。 

(1) IF 〜 THEN 分岐先で、分岐先に数式が用いられている場合—エラー 
OIF 〜 THEN GOTO 分岐先に訂正 

⑵ IF 条件式 THEN 〜で、条件式中で文字列の連結演算が行なわれている場合— 
THEN 以降を実行しない。 

〇条件式中で文字列の連結を行なわないようにする。 
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※ここからは、文法上の繰り返し等を説明するために、以下の記法を用います。 


•太字の語-必ず、その通り書かなければいけない語。 

• {〇〇〇〇}~{ } の中の一つを選択して書かなければなりません。 

• 00001 — [ j の中は省略する書き方もあります。 

• 0000*——右肩に木がついた要素は繰り返して書くことができます。 

•数式-1〇、2 + 3、 A 、 S * Q 等の数値、計算式、数値変数。 

春 文字式 - 、' ABC "、 X $、 N $+ M $ 等の文字定数、文字変数、 

文字計算式。 

參 パラメータ —— コマン ドに伴う要素 0 

• © -プログラム中でのみ実行可能。 

• ( M ) -マニュアルでのみ実行可能。 

• ( A ) -プログラム中でもマニュアルでも実行可能。 

春®-関数命令。プログラム中でもマニュアルでも実行可能0 


く例〉 DATA 〔データ〕し〔データ〕〕* 

全ての要素に〔〕がついていますから、 “ DATA ” とだけ書くこともできます。 
また、•〔データ〕に〔〕*がついていますから、この要素は繰り返して書いても 
よいことになります。従って“ DATA データ，データ，……”と書くことができ 
ます。最初の〔データ〕の部分を省略すれば、“ DATA ，データ，データ，……”と 
書くこともできます。 

G0T0 \林プログラムエリア番号} 

これは以下のような2通りの書き方を表わしています。 

① GOTO 行番号 

② GOTO #プログラムエリア番号 
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[NEW fALL) ⑭ 

| 機 能 1 プログラムの消去。プログラムと変数の消去。 

1 パラメータ 1 ALL 指定したときは P 0 〜 P 9 の全プログラムと変数を消去します 

| H —( l)ALL 指定がないときは、現在指定されているプログラムエリ 
アの プログラムを消去します。変数は消去されません。 

(2) ALL 指定があるときは全プログラムエリアのプログラムと変 
数を消去します。 

(3) パスワード設定中は実行できません。 

⑷プログラム中に書き込んで使うことはできません。 

(5 )WRT モードでのみ実行できます。 

※ 呢 … ALL は NEW A と省略することもできます。 

1_ 例 ■ cam new m 


I RUN 


1 機 

能 1 

プログラムの実行。 

[パラメ- 

-夕1 

実行開始行：行番号 

1 説 

明1 

⑴指定した実行開始行(省略した場合はプログラムの先頭)から 


プログラムを実行します。 

(2) 指定した行番号が存在しないときは、指定より大きく、かつ 
一番近い行から実行を開始します。 


⑶変数はクリアーされません。 


「例、1 10 PRINT ''LINE 10" 
20 PRINT ''LINE 20〃 
30 END 


RUN . 
RUN 20 m 


LINE 16 

LINE 20 
























Lust Ki??}] 


© 


ns : . 能 1 プログラムの内容を表示します。 

ラメータ1 行番号：表示する最初の行番号。 

ALL : P0 から P9 までの全プログラム内容を順に表示します。 

㉚ ン•明 1 I. RUN モードの場合 

(1) 行番号が指定されたときは指定行番号から、行番号が省略さ 
れたときは先頭の行から順にプログラム内容を表示します。 

⑵ プログラム 内容は順に自動的に表示されますので、止めたい 
ときは@キーを押します。再び次の行以降を表示させたいと 
きは®キーを押します。 

(3) プリンタ接続時のプリントモード rPRT " 点灯中）では表示は 
止まらず順次、早い速度で表示します。 

II. WRT モードの場合 

⑴行番号が指定されたときは指定行番号から、行番号が省略さ 
れたときは先頭の行からプログラム内容を表示します。 

(2) WRT モードでは 1 行ごとに表示して、編集可能状態となりま 
すので、編集が必要ないときはそのまま®キーを押しますと 
次の行へ進みます。なお®キーに続けて押しますと、直前の 
行に戻ります。 

• ALL 指•定があるときは P 0 から順に P 9 までの全^ 5 ログラム内 
容を表示して行きます。このときは WRT モードでも順に送ら 
れ、編集することはできません。 

♦パスワード設定中は実行できません0 

※し巴丁 ALL は LIST A と省略することもできます。 

1 例 I LIST E3 

LIST 30 m 
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LPASS 


\~m a g:: 能 1 パスワードを設定または解除します。 

1 パラメータ | パスワード 1〜8文字の文字列 

: B§ 1 (1) パスワードが設定されていないときにこの命令を実行します 

と、全プログラムエリア （P 0〜 P 9 ) にパスワードが設定され 
ます。 

(2) パスワードが設定されているときにこの命令を実行しますと、 
現在設定されているパスワードと後から実行したパスワード 
が一致したときのみ、パスワードが解除されます。パスワ ー 
ドが一致しないときはプロテクトエラー （ERR8) となります。 

⑶パスワードは1〜8文字の文字列で構成され、スペース、ア 
ルファベット、数字、特殊記号などが使えます。但し、「"」 
自身は使えません。 

⑷パスワードが設定されているとき、 LIST、LIST ALL、 
NEW、NEW ALL などのコマンドは使えず、また WRT モー 
ドでの行番号 ■ もエラー （ERR8) となり実行できません。 

(5) プログラム中では使えません。 

(6) 電源スイッチオフでもパスワ ー ドは保持されます。 

(7) パスワードが 設定され ているときに、 SAVE または SAVE 
ALL 文により プログラムをテープに 記録しますと、 パスワ ー 
ド も同時に記録されます。 パスワードが 設定され ているプロ 
グラムを、 テープから LOAD または LOAD ALL 文により読み 
込んだ場合は、 プログラムについているパスワードが 設定さ 
れます。なお、現在 パスワードが 設定され ているときに、 異 
なる パスワードのついたプログラムをテープから 読み込む こ 
とはできません。 （ERR8) 

」至_ M パスワード設定後にパスワードを忘れてしまたときは、本体裏 

面のオールリセットボタンを押して、全プログラムとメモリー 

をクリア ーして ください。 


「例 1 PASS'、CAS 10 
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| SAVE 〔 ALL 〕 〔導，〕 妹 

B — | プログラムをカセットテープに記録します。 

1 パラメータ1 ALL ： 全プログラムエリアのプログラムを記録。 

ファイル名：1〜8文字の文字列。省略可。 

I 説 明 1 ( l)ALL が省略された場合は、現在指定されているプログラム エ 
リアの内容を記録します。 

(2) ALL がついた場合は、 P 0 から P 9 までの全プログラムエリア 
の内容を記録します。 

(3) パスワードが設定されている場合は、パスワードをつけて記 
録しますので、 LOAD コマンドにより読み込んだときに同じ 
パスワードがつきます。 

※ら八ソ巳 A ししは SAVE A と省略できます。 

I 例 I SAVE m 

SAVE、'CAS 10 
SAVE ALL NX PB ,, B33 
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I LOAD 〔 ALL 〕 r ファ ィぐ名つ ® 

n «: ' 能 I プログラムをカセットテーブから読み込みます。 

|">_ータ I ALL ： 全プログラムエリアのプログラムを読み込む。 

ファイル名：1〜8文字の文字列。省略可。 

「脱 明 I ( l ) ALL が省略された場合は、現在指定されているプログラムエ 
リアに "SAVE" で記録されたプログラムを読み込みます。 

(2) ALL がついた場合は、 P 0 から P 9 までのプログラムエリア 
に "SAVE ALL" で記録されたプログラムを読み込みます。 

(3) ハ°スワードつきで記録されたプログラムを読み込みますと、 
記録したときと同じパスワードが設定されます。 

※し OAD ALL はし OAD A と省略できます。 


SAVE とし OAD の関係 



LOAD 

LOAD 

' 、ファイル名 " 

LOAD ALL 

LOAD ALL 

'' ファイル名 " 

SAVE 

〇 

X 

X 

X 

SAVE 

'' ファイル客 ， 

〇 

〇 

X 

X 

SAVE ALL 

X 

X 

〇 

X 

SAVE ALL 

'' ファイル名 ,， 

X 

X 

〇 

〇 


但し、ファイル名は同一のものです。〇…読み込める 

x …読み込めない 
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VERIFY 〔、、 ファイル名 n 

文字列 


能 


I パラメータ I 


カセットテープ上のプログラムやデータの記録状態を チヱ ック 
します。 

ファイル名：1〜8文字の文字列。省略可。 

(1) ファイル名が指定された場合は、同ーファイル名のファイル 
をチェックします。 


⑵ファイル名が省略された場合は、コマンド実行後に最初に表 
われたファイルをチェックします。 


(3) チヱック方式は、記録状態の型式をチヱックします。(パリテ 
ィーチェックといいます） 


「例 1 VERIFY m 

VERIFY 、 'PR0G1"■ 


[CLEAR 




「機 能 1 全ての変数をクリアーします。 

1 脱/明 | (1) 全ての変数をクリアーし、数値変数には0を、文字変数には 

ヌル（何もない）を入れます0 

(2) このコマン ドはプログラム 中に 書き込んでも、 マニュアルで 

も使えます。 


⑶ FOR . NEXT ループ （103 ページ参照）中ではループ制御変数も 
クリアーするために、 NEXT 文実行時にエラーとなります。 

※CLEAR コマンドは VAC としても同じにイ吏えます。 
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Lend ' 

I 機 能 i プログラムの実行を終了します。 

㉟ 明 I プログラムの実行を終了しますので、次にプログラムがあって 
も進行しません。 


|_STOP _^ 

I 機 能 I プログラムの実行を一時中断します。 

I 説 — in ⑴プログラムの実行を一時的に中断し、 、' stop " を表示して入 
力待ちとなります。 

(2) 中断は囤キーにより実行を再開します。 

(3) ST 0 P 文により停止しているときに、 [ M ] キーを押しますと、 
プログラムエリアと行番号を表示します。 

(4) ST 0 P により停止中に回キーによる計算が行なえます。 

I I 数値変数=数式 1 (g 

LLt I J \ 文字変数 = 文字式/ 


Hr 1」能1 左辺の変数に右辺の式の値を代入します。 

I 説 明 1 (1) 数値型変数には数値式が、文字型変数には文字式が対応します。 
(2) LET は省略することができます。 


「，例 v ] 


10 LET X=12 
20 LET Y=Xt2+2*X — 1 
30 PRINT Y 
40 A$=' 、 CASIO" 

50 B$= 、 'PB-400 /, 

60 PRINT A$ ； B$ 

70 END 
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REM : M 


注釈を表わす文です。 

(1) プログラム中に書き込み、 REM 以降は注釈文として扱われ何 
も実行されません。 

(2) 同一行内に実行させたいコマンドを書き込む場合は、 REM 文 
の前にマルチステートメント（：コロン）を書いてください。 

■ 例 …: 1 10 INPUT 、 'R" ,R 

20 S=;r*Rt2:REM MENSEKI 
30 PRINT S 
40 END 


1 機 

能 1 


1 脱 

明 1 


INPUT 


& メッセージ文"， 

文字列 


変数名 


ソッセージ文"，変数名 

文字列 j 


キーボードからデータを変数に入力します。 

メッセージ：文字列。 

変数名：数値変数名または文字変数名。 

I 脱 明 1 (1) キーボードから指定した変数に入力します。 

⑵メッセージがある場合、メッセージを表示し、続けて、'?"を 
表示します。 

⑶メッセージが省略された場合、、' ? " のみが表示されます。 

⑷データ入力の最後には EJ キーを押します。 

(5) 数値変数に文字データを入力しますとエラー (ERR2) となり、 
ES を押した後に再度”？"を表示してデータ入力を促します。 
但し、アルファベット1文字や数式を入力した場合、数式の 
結果が数値のときはその値が代入されます。 

1… 例」 


a _ u 

I パラメータ I 
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10 INPUT A 
20 INPUT 、 'B$=^,B$ 

30 INPUT、' C$= " , C$ ， D$= " , D$ 



























|KEY$ 


[ 機 _ iij キーボードから 1 文字を入力する関数です。 

I — (1) キーボードからのキー入力を1文字分だけ受け入れます。 

(2) 数字、アルファベット、記号がキー入力できます。 

(3) 読み込まれたデータは1文字の文字型となります。 

⑷、'?"は表示せず、入力侍ちにもなりませんので、通常は IF 文 
と組み合わせて使います。 

浓 1<£ 丫 $ は KEY と省略することもできます。 


匚例 1 


10 PRINT 、' INPUT <6>"; 

20 A $='、 〃 

30 K $= KEY $ 

40 IF K$='、"THEN 30 
50 A $= A $+ K $ 

60 IF LEN ( A $)<6 THEN 30 
70 PRINT A $ 

80 END 


參 6 文字をキーボードから受けつけます。 
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[PRINT 〔出力要素〕 [{ ; } 〔出力要素〕丨 * ® 


[M _出力要素を表示します。 

I パラメ>夕1 出力要素：出力制御関数 ( CSR )、 数式、文字式。 

I 脱 ' 明 I ⑴出力要素を表示します。出力制御関数がつく場合は、それに 
よって決められた位置から表示します。 

⑵数式、文字式ではその値を表示します。 

(3) 出力要素が数式の場合は、値の前に符号桁（+， 一） がつきます 
が、+符号は空白として表示されます。 

• 文字型表示 - ^ . ^ 

出力要素 

• 数値型表不 - 1_| . I_J 

符号出力要素 

⑷出力要素が数式で仮数部が10桁以上の場合は、11桁目を四捨 
五入して表示します。また、仮数部以外に符号桁と指数部が 
あるときは指数記号 ( E ) と指数部2桁を表示します。 

(5) 出力要素がメッセージ等の文字定数の場合は、、' 〃の間の文 
字数は30文字以内です。 

(6) 出力要素と出力要素の区切りは，と••が使え、，のときは前 
の出力要素を表示後停止し （ STOP 点灯)、■キーにより、一 
度表示をクリアーしてから、次の出力要素を表示します。区 
切りが；のときは前の出力要素に続けて次の出力要素を表示 
します。 

⑺出力要素が全て省略されたとき （ PRINT のみ）は、表示をクリ 
アーするだけで停止はしません。 

⑻画0と押すプリントモードで印字中は、 PRINT 文を実行して 
も表示は停止しません。 

(9 )S ET 文により数値をフォーマット化することができます。 


1 ::例 1 


10 

PRINT 

1/3 


20 

PRINT 

、' A= " 

；A 

30 

PRINT 

''SIN 

30〃，SIN 

40 

PRINT 

''END 

n • 

t 

50 

PRINT 



60 

END 
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I CSR 出力位置指定 

— WWI% 数式 



指定した位置から出力要素を表示します。 

出力位置指定：数式で、値は小数以下切り捨てとなります。 

0 $指定く12 

( l ) PRINT 文中で用い、出力要素の出力位置を指定します。 
⑵出力位置の与え方は左端を0とします。 


□□□□□□□□□□□□ 

01234567891011 


_，例、..巧:1 10 FOR 1=0 T 011 

20 PRINT CSRI ;、' A " ;CSR 11— B ;、' B " 

30 NEXT I 
40 END 

籲 A と B の文字が■キーを押すごとに左右から移動します。 
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f 分岐先行番号 . I 

0 

GOTO 

行番号 

林プログラムエリア番号 

卜 


0〜9 の 1 文字 



[M _iU 

L パラメータ I 


[脱 明] 


指定された分岐先へ無条件で分岐します。 
分岐先行番号 ：1〜9999の行番号 

プログラムエリア番号： 〇〜9の1文字 

(1) 指定された分岐先へ分岐します。 


(2) 分岐先が行番号の場合は、現在のプログラムエリア内の指定 
行へ分岐し、プログラムを実行します。分岐先行番号が存在 
しない場合は、 エラー （ ERR 4) となります。 


(3) 分岐先かフ° ログラムエリア番号の場合は、指定されたプログ 
ラムエリアへ分岐し、先頭からプログラムを実行します。 
※分岐先行番号、プログラムエリア番号に数式も使えます。 


「例 ] 10 PRINT ''START" ; 

20 GOTO 100 
30 PRINT、、LINE 30 ，x 
40 END 

100 PRINT ''LINE 100" 
110 END 
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ON 分岐条件 

数式 


GOTO 〔分岐先〕〔，〔分岐先〕〕*® 


分岐先は 


分岐先行番号 

:»プログラムエリア番号 


Hat 能1 分岐条件に従って指定された分岐先へ分岐します。 

I —1分岐条件 ：数式で、値は小数以下切り捨てとなり 

ます。 

分岐先行番号 ：1〜9999の行番号 

プログラムエリア 番号： 〇〜9の1文字 

I 脱1」明:1 (1) 分岐条件の式の値の整数部により分岐します。分岐先は先頭 
から順に式の値が1の場合、2の場合……と割り当てられま 
す0 


ON A GOTO 100, 200, 300, . 

⑵式の値が1より小さいか、または相当する分岐先が書いてな 
いときは分岐せずに、次の文を実行します。 

⑶分岐先は一行に納まるまで、いくつでも書けます。 



10 

INPUT 

A 




20 

ON A 

GOTO 

100. 

200,300 


30 

PRINT 

''OTHER" 



40 

GOTO 

10 




100 

PRINT 

''LINE 

100 

": GOTO 

10 

200 

PRINT 

''LINE 

200 

": GOTO 

10 

300 

PRINT 

''LINE 

300 

,7 : GOTO 

10 


• 1〜3を入力すると100〜300行に分岐し、それ以外では 
'' OTHER " を表示します。 
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IF 赠 THEN 


J 文〔:文ア 

1分岐先 

★分岐先は 


⑰ 


f 分岐先行番号 
、#プログラムエリア 番号 


r « _ 8 Ll 分岐条件が成立したとき、 THEN 以降の文を実行します。また 

THEN 以降が分岐先の場合は分岐します。 

[くパラメー タ I 分岐条件 ：比較式 

分岐先行番号 ：1〜9999の行番号 

プログラムエリア 番号： 〇〜9の1文字 


[M _?1] (1) 分岐条件が成立したとき、 THEN 以降の文を実行または分岐 

先へ分岐します。 


(2) 分岐条件が成立しなかったときは、次の行を実行します, 
⑶分岐条件は比較式 （= 、キ、く、〉、 12) により判断します ( 


=左辺と右辺が等しい 
<左辺より右辺が大きい 
$左辺より右辺が大きい 
か等しい 


キ左辺と右辺が等しくない 
>左辺より右辺が小さい 
2左辺より右辺が小さい 
か等しい 


(4) 比較式には、文字列の連結は使えません。 

⑸2つ以上分岐条件がある場合は、 THEN の後に IF 文を続ける 
ことができます。 


IF-THEN IF 〜 THEN. 

※丁 HEN の後が文の場合は、 THEN のかわりに；が使えます。 


E 例 1 


10 N=6 

20 PRINT CSR N； ” ； 

30 K$=KEY$ 

40 IF KS^M^THEN N=N-1： IF N く 0THEN N=0 
50 IF K$=、、6"THEN N=N+1: IF N>1 1THEN N=11 
60 PRINT 
70 GOTO 20 


•、、t "が回キーを押すと左に、回キーを押すと右に動きます。 
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FOR 制御変数名 =MiTO_f STEPmiI ⑨ 

数式 数式 < 数式ノ 

NEXT 制御変数名 


□i _ IC FOR 文から NEXT 文まで、の間を制御変数を初期値から終値まで 

刻み幅で変化させながら繰り返します。 

「パラメータ 1制御変数名：単純変数名で、配列変数は使えません。 

初期値 ：数式 
終値 ：数式 

刻み幅 ：数式。省略したときは1の値 

I 説 明 I (1)F0R 文から NEXT 文までの間を制御変数を初期値から終値ま 
で、亥 I ]み幅で変化させながら繰り返し、制御変数が終値を超 
えたとき繰り返しを終了します。 

(2) 初期値が終値を超えている場合は、 FOR 〜 NEXT の間を 1 度 
だけ実行します。 

(3) 刻み幅は負数も使え、省略した場合は 1 となります。 

⑷ FOR 文と NEXT 文は必ず 1 対 1 で対応していなければなりま 
せん。また、 FOR 文に対応する NEXT 文は、 FOR 文より後に 
書きます。 

(5) F0R 〜 NEXT のループは次のように入れ子構造にすることが 
できます。 

10 FOR 1 =1 TO 10 —n 

20 FOR J=11 TO 20-. 

30 PRINT I , J 
40 NEXT J J 

50 NEXT I — 

60 END 

(6) 入れ子構造にすることをネスティングともいい、 4 重までで 
きます。 

(7) F0R 〜 NEXT ループを終了したとき、制御変数は終値を超え 
たときの値となります。 

(8) F0R 〜 NEXT ループからの外への飛び出しは可能ですが、 IF 
文、 GOTO 文などでループ内へ飛び込むとエラーになります。 
なお、ループから飛び出したときも、ループの中であること 
を記憶していますので、 NEXT 文で終了させない限りネステ 
イングを重ねていきます。 
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[分岐先行番号 

⑰ 

GOSUB 

行番号 

#プログラムエリア番号 

— 


0〜9 の 1 文字 




指定された分岐先へサブルーチン分岐します。 

分岐先行番号 ：1〜9999の行番号 

プログラムエリア 番号： 〇〜9の1文字 

⑴指定された分岐先へサブルーチン分岐します。サブルーチン 
からの戻りは RETURN の実行により行なわれます。 


(2) サブルーチンの中からさらにサブルーチンを引用することを 
ネスティングといい、8段までできます。 

(3) RETURN により GOSUB 文の次の文に戻ります。 


(4) GOSUB 文によりサブルーチン分岐したときに、 IF 文や GOTO 
文などで次の文に戻すと、ネスティングは記憶されたままで 
すので、必ず RETURN で戻してください。 

(5) 分岐先行番号が存在しない場合はエラー (ERR 4 ) となります。 
※分岐先行番号、プログラムエリア番号に数式も使えます。 


匚例 I 


10 

PRINT '、 

MAIN 

10" 

20 

GOSUB 

100 


30 

PRINT 、' 

MAIN 

30" 

40 

END 



100 

PRINT 、' 

SUB 

100" 

110 

GOSUB 

200 


120 

RETURN 



200 

PRINT v 

SUB 200 7, 

210 

RETURN 




IRETURN 


1 機 

能」 


| 脱 

明 | 


サブルーチンから復帰します。 

サブルーチンを呼んだ直後の文へ復帰します。 
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ます。 

分岐先行番号 ：1〜9999の行番号 

プログラムエリア 番号： 〇〜9 の 1 文字 

H 明 1⑴分岐条件の式の値の整数部によりサブルーチン分岐します。 

分岐先は先頭から順に式の値が1の場合、2の場合……と割 
り当てられます。 


ON B GOSUB J 000, 2000, 3000…… 

⑶式の値が1より小さいか、または相当する分岐先が書いてな 
いときは分岐せずに、次の文を実行します。 

⑶分岐先は一列に納まるまで、いくつでも書けます。 


匚例 I 


10 INPUT A 

20 ON A GOSUB 100,200,300 
30 GOTO 10 

100 PRINT ''SUB lOO 77 : RETURN 
200 PRINT、'SUB 200 ^ : RETURN 
300 PRINT NN SUB 300 : RETURN 


•卜 3 を入力すると各々のサブルーチンへ分岐します。 
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⑰ 


[DATA 草〕〔，〔穿〕〕* 


«_ 8 Ll データを収納します。 

データ：文字定数または数値定数 

(1) READ 文で読み取るデータを書く為に用います。 

(2) データは，で区切って複数個書くことができます。 

(3) データを省略すると長さ0の文字列を表わします。 

(4) データ文だけを実行しても何もしません。 

(5) 文字定数の中に，を含むときは、データの両端を 11 で囲んで 
ください。 

DATA ABC, DEF, 、、 GHI. JK し ' …… 


L ハフメ ータ」 




1 説 

明 1 
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READ 変数名〔，〔変数名〕〕* 


⑰ 


10 DATA 
20 READ 
30 PRINT 
40 DATA 
50 READ 
60 PRINT 
70 END 


籲 DATA 文から順にデータを読み込み、表示します。 


(2) 数値変数には数値型のデ ー タのみ読み取れます。 

(3) DATA 文の中のデータは、行番号の小さい方から大きい方へ、 
また同一 DATA 文中では先頭から順に読まれます。 

⑷ READ 文で必要な数を読んだ後、次の READ 文で読まれるの 
は、そのさらに後にあるデータです。 

(5) プログラムの動作の初めには、どのデータも指定されません。 
READ 文の最初の実行で、その READ 文のあるプログラムエ 
リアの先頭のデータが読まれ、以後はこのときのプログラム 
エリアのデータが順に読まれていきます。 

⑹ RESTORE 文により読み込むデータの指定を変えることがで、 
きます。 

⑺ READ 文の変数より DATA 文中のデータが少ないときは エラ 
一 ( ERR 4) となります。 

(8) DATA 文中のデータの先頭にスペースがあるときは読みとば 
します。 


DATA の内容を読み取ります。 

変数名：数値変数または文字変数。配列変数も可。 

⑴現在指定されている DAT A 文の中のデータを順に割り当て 
指定された変数に代入します。 


[ パラメータ 




1説 

明1 


例 


CM. 能 ] 


2 b ;b5 d ?d 
1.A f A4, c, c 


107 












I RESTORE 〔變 



READ 文で読むデータの位置を指定します。 

行番号：数式で、値は小数以下を切り捨てとなります。 
1 S 行番号$9999 

(1) READ 文で読むデータのある DATA 文を指定します0 


(2) 行番号を省略すると、データの指定を解除します。この後最 
初に実行する READ 文により、その READ 文のあるプログラ 
ムエリアの先頭にあるデータかォ旨定され、読まれます。 


(3) 行番号を指定すると、 RESTORE 文が存在するプログラムエ 
リアの行番号力嘴定されます。以後の READ 文では、そのと 
きのプログラムエリアの データが 次々に読まれます。 

⑷指定された行番号が存在しないときや指定された行番号以降 
に DATA 文が存在しないときは、エラー ( ERR 4 ) となります。 



10 DATA 1,2,3 
20 DATA 4,5 
30 READ A,B,C,D,E 
40 RESTORE 10 
50 READ F,G 
60 RESTORE 20 
70 READ H,I 

80 PRINT A ； B ； C ； D ； E ； F ； G ； H；I 
90 END 
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PUT 〔、' z ^ 〃顧，瓣 ® 


「機 能 1 カセットテープにデータを記録します。 

厂 パラメータ |ファイル名：1〜8文字の文字列。省略可。 

変数 ：記録する変数範囲の指定 

I 説で:明 I (1) カセットテープに変数の内容を記録します。 
(2) 変数の指定は次のように書きます。 


PUT A. 変数 A の内容 

PUT A,Z . 変数 A ~Z の内容 

PUT A,A(100). 変数 A~A(100 ) の内容 

PUT $,D,W. 専用文字変数 $ と 13 〜 W の内容 


専用文字変数$の内容を記録する場合は$を最初に書き込み 
ます。 

(3) マニュアルでもプログラム中に書き込んでも使えます。 

GET r ファイル名 〃〕変数!:,変数〕* ® 

文字列 


S _ IU カセットテープに記録されているデータを変数に読み込みます。 

r パラメータ 1 ファイル名：1〜8文字の文字列。省略可。 

変数 ：読み込む変数の指定 

[M _⑴カセットテープに記録されているデータを指定された変数に 

読み込みます。 

⑵変数の指定は次のように書きます。 


GET A. 変数 A に読み込む 

GET A,Z. 変数 A ~Z に読み込む 

GET A , A (100). 変数 A 〜 A (100)に読み込む 

GET $,D,W. 専用文字変数 $ と D~W に読み込む 


(3) PUT により記録した変数名と GET により読み込む変数名は 一 
致していなくてもかまいません。 

⑷ 読み込もうとする変数より記録され ているデータが 少ない場 
合は、記録され ているデータ だけ、先頭の変数から順に読み 
込みます。 

(5) マニュアルでもプログラム中に書き込んでも使えます。 
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[BEEP [則 


a_Mj 

r パラメータ i 


ビープ音を発生させます。 

0 :低音。 

1 • 高音 。 

省略した場合は0と同じ。 


脱 


明 


(1) 低い音と高い音のビープ音を発生させます。 

j ) マニュアルでも使えます。 


I 例 


10 $=、、 ABCDEFGH I JKLMNOPQRSTVUWXYZ ": N :0 


20 FOR 1=1 TO 10 
30 A $= MID $ ( RAN # 木 26 + 1,1 ) 
40 PRINT CSR 4;、' く ,， ； A $;、、>"; 


50 FOR J =1 TO 30 
60 K $= KEY $： IF K $ キ、、 " THEN 80 


70 NEXT J 

80 IF K $= A $ THEN BEEP 1 ：N = N +1 : GOTO 100 
90 BEEP 0 
100 PRINTINEXT I 
110 PRINT ： N ； 


120 IF N > 10 THEN END 
130 FOR 1=1 TO 10 
140 BEEP 0 ：BEEP 1 
150 NEXT I 


籲表示された文字に対応するアルファべットキーを押します。 
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DEFM 〔増設 メモリ- 数〕 ㊇ 

数式 


nr g : 能1 メモリーの増設をします。 

I パ9編^ダ j 増設メモリー数：数式で、値は小数以下切り捨てとなります。 

省略可。 0 S 増設メモリー数<453。 

1:脱1:嚷.明 :I (1) メモリー（変数エリア）の増設を行ないます。 

(2) 増設メモリー数は1個単位で残りステップ数に応じて任意に 
指定できます。 

(3) メモリー1つ増設するごとに8ステップ必要となりますので、 
プログラムエリアのステップ数は減少します。 

(4) 配列変数を使用し、データメモリーを多く必要とするときに 
使用します。 

(5) 増設メモリー数を省略した場合は、現在設定されているメモ 
リー数を表示します。 

(6) マニュアル でもプログラム中に書き込んでも使え、 マニュア 
ルで実行した場合は新しい設定状態(増設メモリー数+基本メ 
モリー数 26) を表示します。プログラム中に書き込んで実行し 
た場合は新しい設定状態は表示されません。 

(7) 残りステップ数よりも多くのメモリーを増設しようとした場 
合は、エラー ( ERR 1) となります。 


1 例 1 DEFM 10 m 

: UflR - 36 

DEFM m 



WRT モードでは残りステッ 
プ数を表示します。 


10 DEFM 10 
20 FOR 1=1 TO 10 
30 INPUT Z(I) 

40 NEXT I 
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Ijviode 数式 


★数式は 4 〜 8 


© 


Hi ，能 1 計算機の状態を設定します。 

I パラメ—夕 I 数式：値は小数以下切り捨てとなります。 

4$数式<9 

1 脱ぺ VV : > 明 1 (1) 数値の値により角度単位やプリントモードの設定•解除を設 
定します。 

⑵設定は次の通りです。 

M 0 DE 4. 角度単位を度に設定します。 

M 0 DE 5. 角度単位をラジアンに設定します。 

M 0 DE 6. 角度単位をグラジアンに設定します。 

M 0 DE 7.、、 PRT " を表示し、プリントモードに設定します。 

M 0 DE 8. プリントモードを解除します。 

(3) これは D キーによる設定と同じですが、 RUN モードや WRT 
モードの設定はできません。 

I 例 110 MODE 4 
20 A=SIN 30 
30 MODE 7 
40 PRINT A 
50 MODE 8 
60 END 
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| SET 

[機 能丨 

L パラメータ」 


[脱 明」 


匚 、例 I 


Fn 

En 

N は0 〜 9の整数 


㊇ 


数値データの出力形式（フオーマット）を指定します。 

Fn ： 小数点以下指定。 

En : 有効桁数指定。 

N :指定解除。 

(1) 数値データを出力するときの、小数点以下の桁数や有効桁数 
の指定を行ないます。 

(2) 小数点以下指定 ( Fn ) では、小数点以下の桁数を0から9桁ま 
で t 旨定します。 

(3) 有効桁数指定 ( En ) では、有効桁数を1から10桁まで指定しま 
す。なお、 "SET E0" としたときは10桁指定となります。 

⑷ 、'SET N" では両指定を解除します。 

⑸マニュアルでもプログラム中に書き込んでも使えます。 

10 INPUT N 
20 SET F 5 ：PRINT N 
30 SET E 5 ：PRINT N 
40 SET N ： GOTO 10 
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文字関数 


I |_EN j ( 単純文字変数） _ F 

I 欉 能 I 与えられた単純文字変数の中の文字数を値とする関数です。 

1 パラ:メーダ I 単純文字変数：配列変数は使えません。 

I 脱 明 I (1) 単純文字変数の中の文字数を数える関数です。 

(2) 使える文字変数は単純文字変数 ( A $, Y $ 等)で、配列文字変数 
( B $(3) 等）は使えません。 

1 例ぐ.レ I 10 INPUT A$ 

20 PRINT LEN ( A $) 

30 GOTO10 
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MID$ (If 〔，響 ) 


⑧ 


^ I: 能 i 専用文字変数 （$) の指定した位置から指定文字数を取り出す関数 
です。 

1 パラメータ I 位置：数式で、値は小数点以下を切り捨てます。 

1 S 位置 <101 

文字数：数式で、値は小数点以下を切り捨てます。 

1 S 文字数 <101 

省略すると、位置以降の全てが指定されます。 


「 説 _ U ) 専用文字変数 （$) の指定した位置から指定した文字数分の文 

字を取り出す関数です。 

⑵位置が文字列の範囲を超えて指定されたときは、ヌル（何も 
ない)を与えます。 

(3) 文字列の、指定した位置以降の長さが指定した文字数より小 
さいときは、指定した位置以降の文字列全部を取り出します。 
※(^旧$は MID と省略することができます。 


匚例 I 


10 $='、ABCDEFGHI JKLMNOPQRSTUVWXYZ 
20 INPUT M,N 
30 PRINT MID $( M , N ) 

40 END 












VAL (単純文字変数) 




「機::能1 単純文字変数内の数字を数値に変換する関数です。 

I パラメ_夕 I 単純文字変数：配列変数は使えません。 

I 脱/明 I (1) 単純文字変数内の数字を数値に変換します。 

⑵文字変数の内容が数字のみ（+、一、 •、 E 、 E _ を含む)の場合は、 
そのまま数値に変換します。 

A $=、、12.3" のとき、 VAL ( A $) 12.3 

(3) 文字変数の内容が数字以外で始まっている場合は、エラーと 
なります。 

A $=、、 A 45" のとき、 VAL ( A $)— エラー （ERR 2) 

(4) 文字変数の内容が数字で始まっているが、途中に数字以外が 
入っている場合は、最初の数字部分を数値に変換します。 

A $=、'78 A 9" のとき、 VAL ( A $)->78 

ノ例 110 INPUT A $ 

20 PRINT VAL ( A $ ) 

30 END 


Lstr$ ( 数式 ) 


「機 能 1 数式の値を文字（数字）に変換します。 

] パラメータ 1数式：数値、計算式、数値変数、配列数値変数 
1 脱.明 I (1) 数式の値を文字に変換します。 

(2) 数式が計算式の場合は、計算結果を文字に変換します。 

I 例 110 PRINT STR $( 123) 

20 PRINT STR $( 45+78) 

30 A =963 
40 PRINT STR $( A ) 

50 END 




















数値関数 


I SIN |g COS H TAN || 

| 機； 能 1 与えられた引数に対する三角関数の値を与える関数です。 

1 パラメータ 1引数：数式0 

一 1440° く 引数く 1440° (度) 

一8: く引数く 8苽 （ラジアン） 

一 1600 く引数く1600 (グラジアン） 

但し、 TAN においては丨引数 l=(2n_1)* 1直角を除く 
1直角=90° =— rad= lOOgrad 

[JK 一" ~ W ] (1) 与えられた引数に対する三角関数の値を与える関数です。 

⑵値は角度単位の設定 (BB キー、モードコマンド）に従います。 


|_ASN || ACS || ATN|| 0 

I携 能 1 与えられた引数に対する逆三角関数の値を与える関数です。 

I パラメータ 1引数：数式。 ASN、ACS は- 1S 引数 S 1。 

I脱:明 1 (1) 与えられた引数に対する角度を与える逆三角関数です。 

⑵値は角度単位の設定 （H キー、モードコマンド）に従います。 

(3) 関数の値は以下の範囲で与えられます。 

一 90SASN X ^90° 

0。 SACS X ^180° 

-90°^ATN X ^90° 
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|LOG|| 


LN 


ill 


⑧ 


□i _ 態 j 対数関数の値を与える関数です。 

[フ费メ▲ダ: I 引数：数式。0 く引数。 

I 脱~ 明1 対数関数の値を与えます。 

•LOG 常用対数関数 \oq ] 0 X s log X 
♦ LN 自然対数関数 log e X、In X 


I EXP 引数 ® 

数式 


r 機能 1 指数関数の値を与える関数です。 
1 狗，-夕 I 引数：数式。 一 227$引数$230。 
1眹 明 I 指数関数の値を与える関数です。 

exp e x 


UQR%# 


「機 能 1引数の平方根を与える関数です。 

P ラメータ 1引数：数式。 引数。 

I 脱 明 I 引数の平方根を与える関数です。 

SQR J~X 
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ABS \X\ 


L SGN ^ 


1機 

能;1 

引数の符号に応じた値を与える閨数です。 

.《ラメ- 

-夕1 

引数：数式。 

I 

I rot 

明 ■ 

引数の符号に応じた値を与える関数です。 


引数が正の場合 、 i 
引数が 0 の場合、 0 
引数が負の場合、-1 


MNTit# 


IM _ HJ 引数を越えない最大の整数を与える閨数です。 

I :パ，メ，ダ I 引数：数式 0 

rft w ~ i 引数を越えない最大の整数を与える関数です。 

INT 12.56—12 
INT 一 78.1——79 
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1 FRAC ^ _© 

I 機 能 ] 引数の小数部を値とする関数です。 

I パラメータ 1引数：数式0 

引数の小数部を値とする関数です。符号は引数の符号と一致し 
ます。 


RND ( 磬，管 ） © 


\~m ml 引数を指定した桁で四捨五入した値を与える関数です。 
1 パラメー^] 引数：数式。 

桁位置：数式。値は小数点以下切り捨てとなります。 


_100< 桁指定 <100 


I 脱 明 1 (1) 引数を指定した桁で四捨五入した値を与える関数です。 

⑵桁指定は10の桁位置乗の位置を四捨五入します。 

小数点以下3桁目を四捨五入— RND ( X ， 一3) 

100の位を四捨五入 — RND ( X ，2) 


120 

















RAN# 




h 能 i o から i の間の乱数を与える関数です。 

1 脱 n 明1 (1)0 から1の間の乱数を与える関数です。0く乱数<1 
(2) 乱数は小数点以下10桁です。 

[ ___ gj I 9 の 1 桁の乱数を作る 

INT ( RAN #* 10) 

1 〜 5 の 1 桁の乱数を作る 

INT ( RAN #* 5) + 5 
10 〜 99 の 2 桁の乱数を作る 

INT ( RAN #*90) + 10 


L DEG 


[m _ U 6 〇 進数を io 進数に変換します。 

1 パラメーダ I 度：数式0 
分：数式。 

秒：数式。 

IDEG (度，分,秒）丨く 10 1 。。 

I 脱 明 I 度•分 • 秒で示される60進数を10進数に変換します。 


M _ __| DEG ( 12,34,56) ■ 12 , 59222222 

10 INPUT A ， B,C 
20 PRINT DEG ( A , B , C ) 

30 END 
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I DMS$ V 


10 進数を 60 進数に変換します。 

引数：数式。|数式 |<10 1Q ° 

I 瓶 . 明 1 (1)10 進数を60進数に変換します。 

(2) 変換された結果は、文字列として与えられます。 

I; 例 I DMS $(45.678) E3 I 45°40 ? 40. 8 


[« _ m 

厂パラメータ1 


10 INPUT A 
20 $= DMS $( A ) 
30 PRINTS 
40 END 
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以下順に データを 
入力します。 

70 SS 


表 


示 


xi ? 


yl ? 


/二次回帰分析/ 

このプログラムは、データズと2/を二次回帰分折して、？/の推定値を求めます。 
計算は？/ =ax 2 + 6 ズ +c に基づいて、 


a = 


yAx 2 -v)^(x^x)-2(x-y)-2(x-x 2 ) 

2(x-x)2(x 2 -x 2 )- \ 2 (x-x 2 )\ 2 

2(x-y)2(x 2 -x 2 )-2(x^y)2(x-x 2 ) 

~ 2 (x^x) . 2 は 2 • 幻 — i 2 は • 幻 1 2 


-b 选 


a ^- 
n n 


として求めます。 

P0 に入れるプログラムはデータ入カプログラムで、データズとデータがを入力 
し、同時に 2X 22/、 ^ x \ 2 xy ^ x \ lx \ 2ガ • 3/を求めます。 

P1 に 入れる プログラムでは、 P0 のプログラムにより 求められた2ん22/、2〆、 
2 xy s 2 x \ 2 x \ 2ガ • J/ から a、 6、 c を 計算し、 続いて 入力された ズに 対する 推定 値 
2/を求めます。 

では、実際に次の例を使って計算してみましよう。 

例） 



1 

2 

3 

4 

5 

6 

7 

X 

1 

5 

8 

1 1 

15 

18 

22 

y 

21 

30 

41 

54 

70 

① 

② 


このデータを回帰分折して、①と②の推定値を求めます。 


ン5? 

x 6? 


作 

sossrag 

操 @ 1215 
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データ入力が終わりましたら、次に P 1 のプログラムを実行します。 


操 作 

ea 

圏 

^8 m 

圈 

22133 


表 示 


0 B 08967 


b= 2„ 14288 


こ 18.23781 


x ゴ？ 


>•= 85.86245 


x =? 


>•= 108.78103 



a 

b 

c 

沒の推定値 
1/の推定値 


このように P 1 のプログラムで a 、 6、 c と2/の推定値を求めます。 

ここでは答を小数以下5桁まで求めていますが、丸める必要がないときや、他 
の桁で丸めたいときは P 1 の行番号90を変換してください。 


メモリー 

A 

2X 3 

B 

2 ガ 

C 

x、y 

1 

a 

J 

b 

K 

c 

N 


M 

データ数 

0 

2 2/ 

P 

^x 2 

R 

2x.y 


P9 

10 CLEAR 

28 PRINT H + l ;: 
INPUT | 

38 PRINT V ； H +1；： 
INPUT Y 

48 H = H + X ：0=0 +Y 
58 P = P + Xt 2; R : R + X*Y 
68 R = ft + Xt 3： B ^ B + Xt 4 
： C = C + Xt 2 *Y 
79 H = H +1 
88 60 T 0 28 


PI 

10 D = P - Ht 2 /fl 
20 E = R - H *0/« 

38 F:(HWV« 

49 6= C - P *0 /fl 
58 H = B - Pt 2 /fl 
68 I =( G * D - E * F )/( D * 
H - Ft 2) 

70 J =( E * H -6* F )/( D * 
H - Ft 2) 

30 K =0/ H - J * H / H -1 *P 
/M 

90 SET F5 

100 PRINT n 3= w ； i, a b 
= u 5J/c= a ；K 
118 INPUT W く 
128 Y = I * Xt 2+ M+K 
138 PRINT - y=*；Y 
140 SOTO 119 


計309 ステップ 
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/万能たてよこ集計/ 

このプログラムは6個の独立したプログラムからできています。 

P0 に入れるプログラムは「データ入カプログラム」で、表のたてとよこを指定し 
て、データを 入力します。 

P1 に入れるプログラムは「表示（印字）プログラム」で、表の中のデータを順次表 
示または印字します。 

P2 に入れるプログラムは「データ編集用プログラム」で、一度記憶させたデータ 
の訂正を行ないます。 

P3 に入れるプログラムは「計算プログラム」で、たて計とよこ計、そして総合計 
を求めます。 

P4 に入れるプログラムは「テープ記録用プログラム」で、メモリー内のデータを 
カセットテープに記録します。 

P5 に入れるプログラムは「テープからの読み込み用プログラム」で、カセットテ 
ープに記録してあるデータをメモリー内に読み込みます。 

では、次のデータを使って操作してみましよう。 



1 

2 

3 

4 

5 

6 

1 

376 

159 

248 

767 

31 口 

351 

2 

320 

85 

287 

833 

291 

541 

3 

480 

41 

166 

750 

426 

367 

4 

518 

269 

343 

565 

221 

268 

5 

536 

158 

426 

495 

235 

492 


操 作 
Y 

6四 

37613 
159园 
24800 

23503 

492 B 31 


表 示 


NewCY/N]? 

TflTE? 

Y0K0? 

(1) 

9 

( 1 ? 2) 

9 

( 1 ? 3) 

9 

( 1 ? 4) 

9 


.新たに表を作るときは Y を押します。 
.たての項目数を入力します。 

•よこの項目数を入力します。 

•順番にデータを入力します。 


5 , 


END 


.データ入力の終了です。 
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次に、入力したデータを確認してみましょう。 


表 示 


THTE? 


YOKO? 


• j ? 


4) 450? 


3 ? 5) 462? 


•たての位置を指定します。 

•よこの位置を指定します。 

•たて3、よこ4のデータを表示しま 
すので訂正が必要なときは、正しい 
数値を入力します。 


晒 

趣 


P 2 に入れた編集用のプログラムは、入力したデータがまちがっていたときや、 
一部のデータを変更して計算をしたいときに使います。 

では、たてが 3 で、よこが 4 のデータを M50" とまちがえていたとします。 


( 5 ? 6) 492 

END _ 


表 示 


PrinterCY/N]? 


1) 376 


1. 2) 159 


1 ：. 


248 


••プリンタに印字するときは Y を押します。 
••以下、 S 3 を押すごとにデータ内容を 
表示していきます。 


以後、次のデータを見たいときは DE 3 と押し、前のデータを見たいときは (B 
圏と押します。これで、前後のデータも訂正できます。 


DBS 


訂正が終りましたら SE 3 と押せば、最初の、' TATE ?" に戻り、たてとよこの指 
定になりますし、 '' TATE ?" と表示され ている ときに〇趣と押せば、このプロ 
グラムは終了します。 




なお、データが表示されているときに、数値を入力しますと新たな数値の入力 
となりますので、注意してください。 


THTE? 

END _ 


( 3 ? 6) 367? 

(も 1) 518? 


作 P20 g ■ g 


操 


@3 450 
7 


eplONB® 

e 

操 
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P 3 に入れたプログラムは、たて計とよこ計、そして総合計を求めます。 


…フリンタに印字するときは Y を押します。 
•••まず、よこ計を表示します。 


••次に、たて計を表示します。 


P4 と P5 に入れたプログラムはデータ保存用で、カセットインタフェイスく FA -3> 
をお持ちの方で、入力したデータを保存したいときに使用します。 

P4 のプログラムは記録用で、プログラムスタートと同時にデータを記録しま 
すので、スタート前にく FA -3> とカセットテープレコーダに接続し、マイク用端 
子とリモート用端子を差し込んで、「録音」状態にしておいてください。 

P5 のブログラムは再生用ですので、スタート前に、く FA -3> とカセットテープレ 
コーダーに接続し、イヤホン用端子とリモート端子を差し込み、「再生」状態に 
しておいてください。 

なお、記録するときは新しいテープを、再生するときはデータの記録してある 
テープをセットしておいてください。 


この プログラムでは全部で1,091ステップをプログラムとして使用していますの 
で、 データ 数（たて x よこ）は315個以内となっています。もし、もっと多くのデ 
一夕を扱いたい場合は、不要なプログラムを記憶させずに、残りステップ数に 
応じて P 0 の行番号80の'' 315" を変更してください。 

P3 に入れている計算用のブログラムは、たて計とよこ計、そして総合計を求め 
るものですので、他の計算を行ないたい方は、このブログラムを変更してみる 
のもよいでしよう。 


•最後に総合計を表示します。 


表 示 


PrinterCY/N]? 

VOf 

0 TOTflL 

( 1 

« 2212 

(2 

« 2357 



TflTE TOTAL 

(1 

• 2238 

(2 

- 712 



GRAND TOTflL 

011325 


作 s NE 团 …… 
操 





















P8 

18 PRINT "Hew LY/H 
]?■; 

20 K$= KEY $： IF K$ 
= B r THEN PRINT 
: 60T0 58 

30 IF K$= ai THEH 2 
8 

48 PRINT : SOTO 21 
0 

50 CLEAR 

68 INPUT B TflTE%Y 
78 INPUT B YOKO-,X 
38 IF Y*X>315 THEH 
68 

99 OEFH X*Y 
190 FOR 1=1 TO Y 
110 FOR J=1 TO X 
128 PRINT 

INPUT 

$ 

130 IF $> B ^ THEH I 
F $<■)!■ THEH 18 
0 

148 IF $ 寒 ■=• THEH 1 
18 

158 IF M>9 THEH J 
0J-1: SOTO128 
160 IF I-Kl THEH 1 
29 

170 I=H ： J=X ： SOTO 
120 

188 Z((H)*X+J)= V 
flL($) 

199 NEXT J 
208 NEXT I 
210 PRINT .EST 

271ステップ 


P ! 

10 PRINT - Printer[ 
VWV) 

28 K$= KEYJ ： IF K$ 
=“ THEH 20 
38 PRINT 

« IF K$=T THEH 
NODE 7 ： PRINT 1 
DftTfl , 

58 FOR 1=1 TO Y 
60 FOR J=1 TO X 
70 PRINT ■，讎 

M ) 

80 NEXT J 
98 IF K$= i Y , THEH 
PRINT 1 B 
180 NEXT I 
110 HOOE 8 
128 PRINT W 

151ステップ 


P2 

18 INPUT B TRTEM 
20 IF $=•=■ THEH P 
RIHT a EHO B ；： EH 
D 

30 IF $>•♦* THEH I 
F $<*x , THEH 50 
40 SOTO10 
58 INPUT "YOKO-，P 
60 0= Vftl($) 

70 PRINT ， C;0;V 
； P ； H ) B ； Z((0-i)* 
X+P)5 ： INPUT i 
38 IF $=•=■ THEH 1 
9 

99 IF I 二 V THEH 1 
40 

188 IF $= B - i THEH 1 
60 

113 IF $> B » M THEH I 
F THEH 13 
0 

128 SOTO 70 
130 Z((0-1)*X+P)= V 
ftL($) 

140 IF P+1>X THEN 0 
=0+i ： P =«： IF 0> 
Y THEH 0=1:P=1: 

SOTO 78 

150 P=P+1 ： SOTO 79 
160 IF P-1<1 THEH 0 
=0-l ： P=X«s IF 
0<i THEH 0=Y ： P= 
X ： GOTO TO 
178 P=P-1 ： SOTO ?9 

293ステップ 
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P3 

19 PRINT "PrinterC 
Y/H] 1 ; 

28 K$= KEY*; IF K$ 
=“ THEN 29 
38 IF K$= a Y* THEM 
HODE 7 
40 PRINT 

50 PRINT 701 (0 TOT 
BL B 

68 FOR M TO Y 
70 H=9 

38 FOR J=1 TO X 
90 ft=ft+Z((I-l)^X+J 

) 

188 NEXT J 
118 PRINT 

128 NEXT I 
130 PRINT , TfiTE TOT 
flL B 
140 B=9 

150 FOR J=1 TO Y 
168 fl=8 

178 FOR 1=1 TO X 
188 ft=fl+Z((M)*X+J 

) 

190 NEXT 1 
280 PRINT 
；R 

219 B=B+ft 

220 NEXT J 

238 PRINT B 8RflHD TO 
TflL B 

240 PRINT B 
250 NODE 8 

263ステップ 


P4 

18 PRINT a DflTfl PUT 

R « 

28 PUT B DflTfl%Y 
38 PUT Z(1),Z(X*Y) 
48 PRIHT 

53 ステップ 


P5 

10 PRIHT -DftTft SET 

B ■ 

28 6ET B DftTfl%Y 
38 DEFK X*Y 
48 SET Z(i),Z(X*Y 〉 
58 PRIHT "^EHD 1 

60 ステップ 
計1091ステップ 
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/算数博士/ 


このプログラムは、たし算、ひき算、かけ算、わり算の問題を出します。 
四則の選択の他に、1桁か2桁の計算が選べます。 

問題は10問で、1問につき10点が与えられます。 

なお、わり算の答は小数点以下2桁まで(切り捨て）で採点します。 


操 作 

表 示 



RUNE3 

Push ..卜：手:/ 

… たし算は a を、ひき算は〇をかけ算 



は〇を、わり算は BI を押す。 

□ 

Ich or 2ch 

… 1 桁か 2 桁を選択 

1 

(1)3+9=? 

… 1 問目 


12_ 

(2)2+7 ゴ？ 

…2 問目 


90S 

(3)2+6 ゴ？ 

…3 問目 







(10)6+7^? 

…10 問目 


13 园 

SCORES 100 

…点数表示 


答が正しいときは N ' ピッピッ " と鳴ります。 



100 点満点のときは点数表示後、ファンファーレのように鳴ります。 

18 E=8 

160 FOR 1=1 TO18 

278 EHD 

28 PRINT "Push + - 

178 PRINT 


388 $= STR$(ft)+ B + g + 

♦ / s ； 

180 fi= ink mm 

STRt(B)+ , = B 

38 K$= KEY 書 

1) 


318 Ofi+B 

40 IF !($=■+■ THEN 

198 B= IHT( RfiNi*H+ 

328 RETURN 

H=l! SOTO 99 

i) 


480 IF ft<B THEN F=fl 

58 IF K$= し 11 THEH 

208 ON H 60SUB 300, 

ifi=B ： B=F 

H=2 ： GOTO 98 

400,580，680 


418 $= 3TR$(ft)+ fc - B + 

69 IF «=■*- THEN 

210 PRIHT ■<■； STR$ 

STW(B ド =“ 

11=3: fiOTO 30 


IH 

428 C=fl-B 

78 IF K$=V THEN 

PUT D 


430 RETURN 

«=4 ： SOTO 98 

229 BEEP 8 ： D= INT(D 

508 $= STR$(R)t h x fi + 

88 GOTO 38 

*106)/100 


STR$(B〉+，= K 

90 BEEP 1 

230 IF C=0 THEN E=E 

510 C=fl*B 

188 PRINT : PRINT 8 

+1：BEEP u e 

!EE 

528 RETURN 

Ich or 2ch B ； 

PI 


600 IF fl<B THEN F=ft 

118 Kl= KEY$ 

240 NEXT I 



120 IF M=T THEN 

250 PRINT ■SCORE ："； 

619 $= STRKfiH - r ■+ 

H=9 ： SOTO 158 

E*18 ； 


STR$(B)+ , = B 

138 IF K$= H 2 , THEN 

268 IF E=10 THEN FO 

620 C = IHT(ft/B*188) 

N=99 ： 60T0 158 

R 1=1 TO10: 

BE 

/100 

140 GOTO 119 

EP 1：BEEP 0 ： N 

630 RETURN 

150 BEEP 1 

EXT I 
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ベルトコンベアーゲーム 


このゲームはベルトコンベアーによって 運ばれてくる製品をよりわけます。 
製品は良品、、0"と不良品、、>ゾとがあり、自分の位置、' ■" に製品がきたときに不 
良品を取り出します。 

不良品は自分の位置に、' x " がきたとき、 BS キーを押します。 

良品はそのまま運ばせます。 

不良品を取り出すと2ポイント、良品を運ぶと1ポイント与えられます。 

なお、3回失敗するとゲームオーバーとなります。 


操作例 

B 四 


(今だ/) 


a 


表 示 
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18 m 0 

28 $= n BELTCOHVEYOR 
80SUB 580 
36 D=9 ； H=8 
40 $= H xox a 
58 C= IHT( _*3) 
+1 

60 6= IHT( S_*10 

) 

78 Z= IHT( RRNI*10 
+ 1 ) 

38 FOR fl=l TO11 ： 
PRINT GSR8”>— 
_n csr 

Z; R | R ! 

38 K$= fUD(C,l; 

188 IF C=2 THEN IF 
ft=ll THEN D=0+1 
: BEEP 1：BEEP 
1：SOTO 43 
118 IF B=1.1 TKEH 26 
8 

120 PRINT CSRft ； K $；： 
BEEP i ： BEEP 8 
138 1$= KEYt ： IF If 
=V THEN 188 
148 FOR B=1 TO S ： H 
EXT B 

150 PRINT CSRfiJ tf 8 5 
160 REM IF ft=ll fHE 
H 48 

170 NEXT fl 
188 IF C=2 THEH 268 
190 IF 狀 Z THEN 220 
289 D=D+2 ： PRINT CS 

218 FOR 1=1 TC 5! B 
EtP 8 ： SEEP 1 ： 
NEXT I 

228 IF THEH 266 
238 FOR M TO ?8 
240 NEXT F 
258 SOTO 48 
268 PRINT CSR8；-(( 
DftHE! )) B ? 

278 FOR E=8 T8 5 


280 BEEP 8: SEEP 0: 

BEEP 1 
290 NEXT F 
300 11=11+1 ： If H<3 T 
HEN 

319 $= U [8BHE-0VER] 

B ： SOSUB 586 
220 PRINT [: SR 的 - SCO 
RE n ； D ；： BEEP 8 ： 
END 

508 PRINT 

518 FOR H=1 TO LEH( 

I) 

520 PRINT HI_ ， 1) 
；：BEEP 1 
538 NEXT H 
540 FOR H=8 TO 48 ： 
NEXT H 

559 PRINT 

560 RETURN 

計513ステップ 


133 



^並びかんゲーム/ 

このゲームは 不規則に並んで いる 0から9 の 数字を正しく、'0123456789"と 
並びかえます。 

使うキーは回と回と D で、回を押すとカゴが左に移動し、固を押すとカゴが右 
に移動します。 B 3 キーを押すと、現在の カゴの 位置にある数字をカゴに入れ、 
カゴに入っていた数字をかわりに置きます。 


表示の見方 


571^364), 


数字の並びカゴの中味 


:の点滅がカゴの位置です。 


表示される SCORE (点数）は作業時間で、小さい程良いのです。 

なお、 ハイスコアーが 残るようになっていますので、最初に実行するときや、 
他の プログラムを 実行した後は、必ず、' CLEAR ■"と操作してください。 


操 作 

表 示 


CLEAR 回 


…最初だけ行ないます 

RU _ 

H 卜 Sc:0 

…ハイ スコア ー 表不 


<< T !>> 

…問題作成中 


3721 本 94650> 


□ 

3721 ホ 94650>8 

…8をカゴに入れる 

回回回回 

3721 946^0)8 

…正しい位置に移動 

a 

3721 946*8)5 

…を置く。 5がカゴに入る 

@ 回回 

3721 ^4680)5 

…5を置く。9がカゴに入る 

□ 

3721 +4680)9 

…正しい位置に移動 

以下順に繰り返す i 


a 

0123+56789)4 

…最後の4を置く 


[0123456789] 

…並びかえ成功 


SCORE 132 

.•.スコア ー 表不 


ゲームを続ける場合は、直接、' RUNET と操作してください。 

カゴに入れる順番やキーを押すタイ ミン ダにより、 スコアーは どんどん縮まり 
ます。 


134 



















★あなたの腕まえは？ 


スコアー 

評 価 

50 未満 

あなたは天才.グ運も強い。 

50 〜 69 

抜群の反射神経です。 

70 〜 99 

やっと人並み。もう一歩です。 

100〜149 

まだまだ練習不足です。 

150以上 

何かのまちがいでしょう？もう一度どうぞ。 


16 PRINT "Hi-Sc ： 1 ； 
H;: FOR 1:1 TO 
18 ： BEEP 1；HEX 
T I 
2M: Ma 

38 PRINT : PRINT 1 
<〈 HflIT ! >>•; 
48 fl$= STR$( INK 
SflNt*10» 

58 FOR 1=1 TO LEN( 

$) 

68 IF fl$= HIW(I，1 
)THEN 48 
70 NEXT I 
80 

99 IF LEHdXiB TH 
EH 48 
108 PRINT 

118 X=5 ： B$= R H tH=8 
128 PRINT CSR8 ； I； B > 
•;B$; 

138 PRINT CSRX; B *-; 
148 K$= KEY! 

158 IF K$=M - THEN 
BEEP 8 ： X=X-1：I 
F X<9 THEN X=9 
169 IF K$=-6 M THEN 
BEEP 8 ： X=X+1：I 
F X>9 THEN X=9 
178 IF K$= E +- THEH 
GOSUB 508 
130 N=H+1 

190 IF $#012345678 
9 B THEH 128 
200 IF H 却 THEH H=H 


210 IF H>N THEM H=H 
220 PRINT : PRINT H 
[■⑴ •]” 

230 FOR 1=1 TO10 
240 BEEP 8 ： BEEP 1 
250 NEXT I 
260 PRINT 

278 PRINT tt SCORE B 5H 

238 EHD 
580 BEEP 1 
519 IF X=8 THEH C$= 
HID$(1,1) ； $=B$ 
+ HID$(2 )： 60T0 
540 

528 C$= HID*(X+i,l) 
530 $= HID$(1,X)+B$ 
+ HIDKX+2) 

549 BI=C$ 

558 RETURN 
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エラーメッセージー覧表 


エラー 
コ I ド 

意 味 

エラー 原因 

対 策 

1 

メモリーオー 
バーまたはシ 
ステムスタツ 
クオーバー 

籲ステップ数不足でプロダラ 
ムが書き込めない。または 
メモリーが増設できない。 

春計算式が複雑すぎてスタッ 
クオーバーしている。 

•不要なプログラムをクリア 
するか、メモリー数を減ら 
す0 

«数式を分割して簡単にする0 

2 

構文エラー 

參プログラム等に書式上の誤 
りがある。 

•代入文等で左辺の型式と右 
辺の型式が異なる。 

•入力したプログラム等の誤 
りを修正する。 

3 

数学的エラー 

«数式の演算結果が1〇 100 以上 
の場合。 

•数値関数の入力範囲外の場 
合。 

參結果が不定または不能とな 
る場合。 

參演算式またはデータを修正 
する。 

♦データを判断する。 

4 

未定義エラー 

• GOTO 文、 GOSUB 文の指 
定行番号がない。 

♦ READ 文に対するデータが 
不足している。 

♦指定行番号を修正する。 

春データ数を正しくする0 

5 

引数エラー 

參引数を必要とするコマンド、 
関数において、引数が入力 
範囲外の場合。 

參引数の誤りを修正する。 

6 

変数エラー 

參増設されていないメモリー 
を使おうとした。 

籲同ーメモリーを数値変数と 
文字変数に同時に使おうと 
した。 

•適切にメモリーを増設する。 

春同時に同ーメモリーを文字 
変数、数値変数として使わ 
ないようにする。 

7 

ネステイング 
エラー 

參サブルーチン実行中以外で 
RETURN 文が出てきた場合。 

參 FOR ノレープ中以外で、 NEXT 
文が出てきたり、 FOR 文 
に対する NEXT 文の変数が 
異なる場合。 

參サブルーチンのネステイン 
グが 8 段をこえた場合。 

• FOR ループのネステイング 
が 4 段をこえた場合。 

鲁不必、要な RETURN 文や 
NEXT 文を取る。 

• サブルー千 ンや FO R • NEXT 
ループをレベル内にする。 
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I ラ 7 ： 

コード 

意 味 

エラー 原因 

対 策 


パスワード 

參パスワードが設定されてい 

♦正しいパスワードを入力し 

8 

エラー 

るときに、異なるパスワ ー 
ドを入力した。 

♦パスワードが設定されてい 
るのに、 LIST や NEW など 
の禁止コマンドを実行した。 

て、パスワードを解除する。 

9 

オプション 

エラー 

♦テープレコーダが接続され 
ていないのに、 SAVE また 
は PUT コマンドを実行した 
場合。 

• LOAD または GET コマンド 
により入力された信号がわ 
れており、読み込めない場 

• テープレコーダを接続する0 

♦テープレコーダの再生ボリ 
ュームを下げる。 

•テープレコーダの TONE を 


合。 

♦プリンタの充電が十分でな 
い場合。 

籲プリンタの紙づまり 0 

中位に調整する。 

•テープをかえる。 

•テープレコーダのヘッドを 
クリーニングする。 

籲プリンタを充電する0 

•プリンタの紙づまりを直す。 


キャラクター表 



スぺ_ス 

+ 

一 

氺 

/ 

个 

/ 

99 

# 

$ 

> 


= 

く 

< 

キ 

数字 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

• 

7 t 

) 

( 

E ' 

E 

英大文字 

A 

B 

C 

D 

E 

F 

G 

H 

1 

J 

K 

し 

M 

N 

0 

P 

Q 

R 

S 

T 

U 

V ， 

W 

X 

Y 

Z 



英小文字 

a 

b 

c 

d 

e 

f 

g 

h 

i 

j 

k 

1 

m 

n 

0 

P 

q 

s 

r 

t 

u 

V 

w 

X 

y 

z 


記号 

? 

t 

• 

t 

• 

• 




づうつべ 、' 力 

記号 

O 

2 

O 

A 

@ 

X 

+ 

奉 

< —— 

▼ 

♦ 

* 

u 


1 

— > 

% 

¥ 

□ 

[ 

& 

— 

t 

參 

] 

■ 



表は左から右へ、次の段の左から右へと小さい順に並んでいます。 

一番小さいキャラクターは、スペースで、一番大きいキャラクターは、グラフ 
ィク記号の■(拡張モードにし、を押すと表示される）です。 
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フロ _ チャートの主な記号 


記 号 

名 称 

意 味 

( 

: ) 

m 子 

開始、終了等 


— 


手操作入力 

キーボー ドからのデ ー タ入力 

口 

出 力 

出力の機能 




処 理 

あらゆる種類の処理機能 




定義済み処理 

サブルーチンなど、別の場所で定 
義されている命令群 

0 

判 断 

いくつかの 択一的径路のうち、ど 
の径路をとらせるかを決める判断 
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厂 fi 号 

名 称 

意 味 


「知 

一） 

1 


FOR * NEXT ル-プ 

FOR 文と NEXT 文の間で、一定回 
数分処理を行なう。 




書 類 

書類を媒体とする入出力機能 


流れ 線 

記号を結びつける機能 


フローチヤートのほかの場所への 
出口またはほかの入口 


— 


注 

釈 

明瞭にするため、説明または注意 
を加える機能 
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コマンド索引 


ABS … 
ACS … 
ASN … 
ATN … 
BEEP •• 
CSR …•- 
CLEAR 
COS … 
DATA • 
DEFM- 
END … 


18，119 
18，117 
18,117 
18,117 
65，110 
.74, 99 

.94 

.18,117 
.67,106 
.64，111 
……95 


EXP ... 18,118 

FOR 〜 TO 〜 STEP/NEXT..54’ 103 

FRAC. 18,120 

GET . 80，109 

GOSUB. 57,104 

GOTO. 45,100 

IF 〜 THEN. 49,102 

INPUT. 25, 96 

INT. 18,119 

KEY$.74, 97 

LEN . 72,114 

LET ..28, 95 

LIST.90 


LOAD ( ALL ) .78, 93 

LOG . 18，118 

MID$ . 72,115 

NEW (ALL).89 

PASS .91 


PRINT. 47， 98 

PUT. 80，109 

RAN#. 18，121 

READ. 67，107 


REM .96 

RESTORE . 67,108 

RETURN . 57，104 

RND . 18，120 

RUN .36, 89 

SAVE (ALL) .78, 92 

SGN . 18，119 

SIN. 18,117 

SQR . 18,118 

STOP.43, 95 

STR$ . 72,116 

TAN . 18，117 

VAL . 72，116 

VERIFY .94 
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規 格 


型 式： PB -400 

基本計算機能：負数、指数、カッコを含む四則計算(加減•乗除の優先順位判別 
機能つき） 

組込関数機能：三角.逆三角関数(角度単位は度•ラジアン•グラジアン)、対数. 

指数関数、開平、べき乗、整数化、整数部除去、絶対値、符号 
化、有効桁数指定、小数点以下指定、10 ㈠ 60進変換、乱数 、； r 
コマンド： INPUT 、 PRINT 、 GOTO 、 ON 〜 GOTO 、 FOR . NEXT 、 

IF 〜 THEN 、 GOSUB 、 ON 〜 GOSUB 、 RETURN、READ 
DATA 、 RESTORE 、 STOP 、 END 、 RUN 、 LIST 、 

LIST ALL 、 MODE 、 SET 、 CLEAR 、 NEW、NEW ALL 、 
DEFM 、 PASS 、 REM 、 LET 、 SAVE、SAVE ALL 、 

LOAD, LOAD ALL, PUT 、 GET、VERIFY 
プログラム関数： key $、 csr 、 len 、 mid $、 val 、 str $ 

計算範囲： 土 1 X 10" 〜土 9.999999999 X 10" および〇、内部演算は仮数部 12 桁 
を使用 

プログラム言語： BASIC (ベーシック） 

R A M 容量：約 4.3Kbyte 

(システムエリア約 0.5 Kbytes 、 メモリーエリア約 240 bytes を舍 
む） 

ステップ数： 最大3616ステップ 
組込プログラム数：最大10組 ( P 0 〜 P 9) 

メモリー数： 標準26〜最大478メモリー、および専用文字変数 （$) 

スタック数： サブルーチン 8段. FOR.NEXT ループ4段 
数定値6段•演算子12段 

表示方式および：仮数部10桁(負符号含む)、または仮数部8桁(負数7桁）十指 
数部2桁、内容 EXT 、®、 RUN 、 WRT 、 DEG 、 RAD 、 

GRA 、 TR 、 PRT 、 STOP の各状態表示付 
表示素子： 12桁ドットマトリクス液晶 
主要素子： C-MOS VLSI 他 
電 源： リチウム電池 ( CR -2032) 2個使用 

消費電力： 最大0.03 W 

電池寿命： 本体のみ170時間 
(連続使用） 

オートパワーオフ ：約 7 分 

使用温度： 0° C 〜 40 °C 

大きさ•重さ： 幅165奥行71高さ9.8麵、 130g (電池込み） 

付属品： ソフトケース 
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カシオ計算機株式会社営業本部 

東京都新宿区西新宿 2 — 6 新宿住齐 
(〒丨 60) 003-347-4811( 代表) 

カシオ計算機サービスセンター 


旭川 
札幌 
m 路 
青森 

秋田 
盛岡 
仙台 
山形 
郡山 
宇都宮 
前橋 
水戸 
埼玉 
千葉 
東京 
中央 
城南 
城西 
多摩 
横浜 
新潟 
長野 
甲府 
静岡 
浜松 
豊橋 
名古屋 
岐阜 
三重 
富山 
金沢 
京都 
大阪 
和歌山 
神戸 
岡山 
福山 
広島 
山 口 
高松 
松山 
ネ虽岡 
長崎 
熊本 
鹿児島 


0166-23-8580 

011-231-2343 

0154-24-8575 

0177-22-7466 

0188-33-621 I 

0196-24-2502 

0222-27-1404 

0236-42-8018 

0249-33-5172 

0286-34-0395 

0272-53-3000 

0292-25-6985 

0486-66-8567 

0472-43-1751 

03-862-4141 

03—583-411 1 

03-787-3721 

03-376-3221 

0425-23-3531 

045-2 N -0821 

0252-41-4105 

0262-28-9360 

0552-37-6371 

0542-81-8085 

0534-64-1658 

0532-53-2515 

052-263-0454 

0582-62-0145 

0592-27-5066 

0764-22-2251 

0762-37-851 I 

075-351-1 161 

06— 362-8181 

0734-31-7807 

078-392-4123 

0862-4 卜8471 

0849-24-2830 

082-263 - I 090 

0835-22-6164 

0878-62-5240 

0899-45-2234 

092-411-2684 

0958-61-8084 

0963-67-0650 

0992-56-3575 


〒〇70 
〒〇60 
〒〇85 
〒〇30 
〒〇10 
〒〇20 
亍980 
〒990 
〒963 
〒320 
〒371 
〒310 
〒330 
亍260 
〒101 
亍106 
〒145 
〒160 
〒190 
亍231 
〒950 
〒380 
亍400 
〒420 
亍435 
〒440 
〒460 
〒500 
〒514 
亍930 
亍920 
〒600 
亍530 
〒640 
〒650 
〒700 
亍720 
〒730 
〒747 
〒760 
〒790 
亍812 
〒852 
亍862 
〒890 


旭川市七条通り8 丁目 
礼幌市中央区南一条西 12 丁目 
釧路市光陽町 6 — I 

青森 市勝田 2_丨 一12 
秋田市中通り6 — I 一 15 


盛 

岡市本町通り 

3 - 

- 19 — 

6 

仙 

台市一番町 

2 一 

3 — 

32 

山 

形市あこや町 

3 - 

—14 — 

39 

福島県郡山市香久池 2 

—16 — 

6 

宇 

都宮市西大寬 

2 - 

- 1 — 

3 

前 

橋市元総社 

町 

92 一 

5' 

水 

戸市中央丨 

一 

2 一 

20 

大 

宮市大成町 

1 - 

-1 8 

1 

千 

葉市登戸町 

2 — 

- 2 7 

6 

千 

代田区神田佐久間町 2 — 

nr ふ 士女 9 — 7 一 

23 

6 

大 

ノ、 ，十、 し 

田区上池台 

1 - 

-1 — 

6 

新 

宿区西新宿 

4 - 

- 2 一 

18 

立 

川市錦町 3 

— 

2 — 

25 

横 

浜市中区弁天 

通 

り 6 — 

85 

新 

潟市米山 3 

— 

1 — 

5 

長 

野市岡田 

町 

30 — 

20 

甲 

府市城東 2 

一 

22 — 

II 

静 

岡市西中原 

1 - 

- 4 — 

35 

浜 

松市西塚 

町 

3 2 

4 

豊 

橋 市 魚 

町 

5 

名 

古屋市中区栄 

4 

— 6 一 

.15 

岐 

阜市腥 

見 

町 

8 

津 

市 鳥居町 

19 

1 

富 

山市白銀 

町 

2 — 

1 


金沢市諸江町下丁 93—丨 
京都市下京区五条通り堀川東入ル 
大阪市北区南森町2_丨 一 20 
和歌山市九家の丁 5 
神戸市中央区北長狭通り4 — 4 — 18 
岡山市西古松西町 8—21 
福山市南本庄町2— 丨3 0 

広島市南区稲荷町4一 丨 
防府市戎町 I — 10 — 16 

高松市亀岡町 9 — 16 

松山市平和通り丨_丨一 5 
福岡市博多区博多駅南丨 一 2 — 15 
長崎市宝栄町 2 — 26 

熊本市健軍 4 — 丨- 5 

鹿児島市上荒田町30 — 18 









































